Changeset 13 in bookmarks for trunk/Bookmarks.pm

Timestamp:

01/19/13 17:16:14 (12 years ago)

Author:

peter

Message:

• the list of bookmarks accepts limit and offset parameters

File:

• trunk/Bookmarks.pm (modified) (2 diffs)

trunk/Bookmarks.pm

@@ -38 +38 @@
     my $tag = $params->{tag};
     my $limit = $params->{limit};
+    my $offset = $params->{offset};
 
     my ($sql, @bind) = sql_interp(
@@ -43 +44 @@
         ($tag   ? ('join tags on resources.uri = tags.uri where tags.tag =', \$tag) : ''),
         'order by ctime desc',
-        ($limit ? ('limit', \$limit) : ''),
+        ($limit ? ('limit', \$limit) : ()),
+        # an offset is only allowed if we have a limit clause
+        ($limit && $offset ? ('offset', \$offset) : ()),
     );