filter => sub { $_[0] eq $params{page} },
sort => exists $params{sort} ? $params{sort} : "age",
reverse => yesno($params{reverse}),
filter => sub { $_[0] eq $params{page} },
sort => exists $params{sort} ? $params{sort} : "age",
reverse => yesno($params{reverse}),
foreach my $page (@list) {
my $file = $pagesources{$page};
my $type = pagetype($file);
foreach my $page (@list) {
my $file = $pagesources{$page};
my $type = pagetype($file);
if ($needcontent) {
# Get the content before populating the
# template, since getting the content uses
if ($needcontent) {
# Get the content before populating the
# template, since getting the content uses
filter($page, $params{destpage},
readfile(srcfile($file)))));
}
filter($page, $params{destpage},
readfile(srcfile($file)))));
}