summaryrefslogtreecommitdiff
path: root/doc/plugins/contrib/unixauth
ModeNameSize
-rw-r--r--discussion.mdwn2449logplain
"hl opt">{ #{{{
  • hook(type => "preprocess", id => "orphans", call => \&preprocess);
  • } # }}}
  • sub preprocess (@) { #{{{
  • my %params=@_;
  • $params{pages}="*" unless defined $params{pages};
  • # Needs to update whenever a page is added or removed, so
  • # register a dependency.
  • add_depends($params{page}, $params{pages});
  • my %linkedto;
  • foreach my $p (keys %links) {
  • map { $linkedto{bestlink($p, $_)}=1 if length $_ }
  • @{$links{$p}};
  • }
  • my @orphans;
  • my $discussion=gettext("discussion");
  • foreach my $page (keys %pagesources) {
  • next if $linkedto{$page} || $page eq 'index';