diff options
author | Simon McVittie <smcv@debian.org> | 2014-09-12 21:38:06 +0100 |
---|---|---|
committer | Simon McVittie <smcv@debian.org> | 2014-09-12 21:38:06 +0100 |
commit | 2eea320b674870956f6ad6c7b377b158cec2d624 (patch) | |
tree | 084962f3cb08df96ee83829c679e65cc5d703b95 /IkiWiki.pm | |
parent | a5536103e7a64d5b15da50666d00aaa86686d945 (diff) | |
parent | 3f4a93574071c004fc332a68b2cac1f70de7f940 (diff) | |
download | ikiwiki-2eea320b674870956f6ad6c7b377b158cec2d624.tar ikiwiki-2eea320b674870956f6ad6c7b377b158cec2d624.tar.gz |
Merge branch 'ready/trail-sort'
Diffstat (limited to 'IkiWiki.pm')
-rw-r--r-- | IkiWiki.pm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/IkiWiki.pm b/IkiWiki.pm index cd4ac815d..49ac97196 100644 --- a/IkiWiki.pm +++ b/IkiWiki.pm @@ -2460,6 +2460,19 @@ sub pagespec_match ($$;@) { return $sub->($page, @params); } +# e.g. @pages = sort_pages("title", \@pages, reverse => "yes") +# +# Not exported yet, but could be in future if it is generally useful. +# Note that this signature is not the same as IkiWiki::SortSpec::sort_pages, +# which is "more internal". +sub sort_pages ($$;@) { + my $sort = shift; + my $list = shift; + my %params = @_; + $sort = sortspec_translate($sort, $params{reverse}); + return IkiWiki::SortSpec::sort_pages($sort, @$list); +} + sub pagespec_match_list ($$;@) { my $page=shift; my $pagespec=shift; |