Changeset 82 in bookmarks for trunk/TODO

Timestamp:

06/03/15 17:13:52 (10 years ago)

Author:

peter

Message:

issue #8: added notes about deleting bookmarks

File:

• trunk/TODO (modified) (1 diff)

trunk/TODO

@@ -17 +17 @@
     $ bkmk stop
     # stops the running server
+
+Deleting bookmarks
+
+    sub delete {
+        my $self = shift;
+        my $bookmark = shift;
+
+        my $sth_insert = $self->dbh->prepare('insert into deleted_bookmarks (id, dtime) values (?, ?)');
+        $sth_insert->execute($bookmark->id, time);
+        my $sth_delete = $self->dbh->prepare('delete from bookmarks where id = ?');
+        $sth_delete->execute($bookmark->id);
+    }
+
+Paging of results (will require counting bookmark total)
+
+    sub get_count {
+        my $self = shift;
+        my $search = shift;
+
+        my ($sql, @bind) = sql_interp(
+            'select count(*) from resources join bookmarks on resources.uri = bookmarks.uri',
+            $self->_sql_where_clause($search),
+        );
+        my $sth = $self->dbh->prepare($sql);
+        $sth->execute(@bind);
+        my ($count) = $sth->fetchrow_array;
+        return $count;
+    }