aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2015-03-08 17:21:51 +0000
committerdakkar <dakkar@thenautilus.net>2015-03-08 17:21:51 +0000
commit3e89ef6040b3ba87d12c4d130dfc3dee79b5eaf5 (patch)
tree270a82c0416708c665e8af400896e4ab8a9c4042
parentfix estr uri escaping unsafe set (diff)
downloadWebCoso-3e89ef6040b3ba87d12c4d130dfc3dee79b5eaf5.tar.gz
WebCoso-3e89ef6040b3ba87d12c4d130dfc3dee79b5eaf5.tar.bz2
WebCoso-3e89ef6040b3ba87d12c4d130dfc3dee79b5eaf5.zip
add (n)sortf for arrays
-rw-r--r--lib/WebCoso/TT.pm12
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/WebCoso/TT.pm b/lib/WebCoso/TT.pm
index 50b28a3..923877c 100644
--- a/lib/WebCoso/TT.pm
+++ b/lib/WebCoso/TT.pm
@@ -29,6 +29,18 @@ $Template::Stash::HASH_OPS->{nsortf}=sub {
}
};
+$Template::Stash::LIST_OPS->{sortf}=sub {
+ my ($array,$field)=@_;
+
+ return [ sort { lc $a->{$field} cmp lc $b->{$field} } @$array ];
+};
+
+$Template::Stash::LIST_OPS->{nsortf}=sub {
+ my ($array,$field)=@_;
+
+ return [ sort { $a->{$field} <=> $b->{$field} } @$array ];
+};
+
sub new {
my ($class,%opts)=@_;