limit attribute for MTOrder tag, allows you to limit the number of Or…

…deredItems *after* they have been ordered/sorted
markpasc · Aug 15, 2008 · e357232 · e357232
1 parent 947dee6
commit e357232
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/plugins/Order/lib/Order/Plugin.pm b/plugins/Order/lib/Order/Plugin.pm
@@ -27,6 +27,13 @@ sub tag_order {
         ;
     @objs = map { $_->[1] } @objs;
     @objs = reverse @objs if $order eq 'descend';
+
+    if (my $limit = ($args->{lastn} || $args->{limit})) {
+        if (scalar @objs > $limit) {
+            @objs = @objs[0..$limit-1];
+        }
+    }
+
     return join q{}, @objs;
 }