if (! defined $config{autoindex_commit}) {
$config{autoindex_commit} = 1;
}
- if (! $config{autoindex_commit}) {
- $config{only_committed_changes}=0;
- }
}
sub genindex ($) {
my $dir = $config{srcdir};
if (! $config{autoindex_commit}) {
+ no warnings 'once';
$dir = $IkiWiki::Plugin::transient::transientdir;
}
my (%pages, %dirs);
foreach my $dir ($config{srcdir}, @{$config{underlaydirs}}, $config{underlaydir}) {
- next if $dir eq $IkiWiki::Plugin::transient::transientdir;
chdir($dir) || next;
find({
$file=~s/^\.\/?//;
return unless length $file;
if (IkiWiki::file_pruned($file)) {
+ no warnings 'once';
$File::Find::prune=1;
}
elsif (! -l $_) {
if (! -d _) {
$pages{pagename($f)}=1;
}
- elsif ($dir eq $config{srcdir}) {
+ elsif ($dir eq $config{srcdir} || ! $config{autoindex_commit}) {
$dirs{$f}=1;
}
}