return &$template(@_);
}
-# Define default entries subroutine
+# Define default find subroutine
$entries =
sub {
my(%files, %indexes, %others);
($path,$fn) = $path_file =~ m!^$datadir/(?:(.*)/)?(.*)\.$file_extension!;
# Only stories in the right hierarchy
- $path =~ /^$currentdir(?=$|/)/ or $path_file eq "$datadir/$currentdir" or next;
+ $path =~ /^$currentdir(?=$|\/)/ or $path_file eq "$datadir/$currentdir" or next;
# Prepend a slash for use in templates only if a path exists
$path &&= "/$path";