Merge commit '118a2189fb203dedc274848833b5431273cb1db5' into main
commit
43f55e6f0a
|
@ -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} = '';
|
||||
|
||||
|
|
Loading…
Reference in New Issue