Changeset 959

Show
Ignore:
Timestamp:
08/15/08 16:02:46 (3 months ago)
Author:
arvind
Message:

limit attribute for MTOrder tag, allows you to limit the number of OrderedItems? *after* they have been ordered/sorted

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/Order/plugins/Order/lib/Order/Plugin.pm

    r767 r959  
    2828    @objs = map { $_->[1] } @objs; 
    2929    @objs = reverse @objs if $order eq 'descend'; 
     30     
     31    if (my $limit = ($args->{lastn} || $args->{limit})) { 
     32        if (scalar @objs > $limit) { 
     33            @objs = @objs[0..$limit-1]; 
     34        } 
     35    } 
     36     
    3037    return join q{}, @objs; 
    3138}