Changeset 959
- Timestamp:
- 08/15/08 16:02:46 (3 months ago)
- Files:
-
- trunk/Order/plugins/Order/lib/Order/Plugin.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/Order/plugins/Order/lib/Order/Plugin.pm
r767 r959 28 28 @objs = map { $_->[1] } @objs; 29 29 @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 30 37 return join q{}, @objs; 31 38 }
