Merge commit '118a2189fb203dedc274848833b5431273cb1db5' into main

main
Sam Lantinga 2022-06-29 17:25:01 -07:00
commit 43f55e6f0a
1 changed files with 7 additions and 3 deletions

View File

@ -597,15 +597,19 @@ while (readdir(DH)) {
next; # only dealing with wiki pages.
}
my $fn = $dent;
$fn =~ s/\..*\Z//;
# Ignore FrontPage.
next if $fn eq 'FrontPage';
# Ignore "Category*" pages.
next if ($dent =~ /\ACategory/);
next if ($fn =~ /\ACategory/);
open(FH, '<', "$wikipath/$dent") or die("Can't open '$wikipath/$dent': $!\n");
my $current_section = '[start]';
my @section_order = ( $current_section );
my $fn = $dent;
$fn =~ s/\..*\Z//;
my %sections = ();
$sections{$current_section} = '';