removing debug-lines.
parent
fff0adf91f
commit
ffa2913b45
|
@ -80,7 +80,7 @@ diff -c /usr/share/perl5/IkiWiki/Plugin/meta.pm.distrib /usr/share/perl5/IkiWiki
|
|||
|
||||
***************
|
||||
*** 289,294 ****
|
||||
--- 290,323 ----
|
||||
--- 290,319 ----
|
||||
}
|
||||
} #}}}
|
||||
|
||||
|
@ -88,8 +88,6 @@ diff -c /usr/share/perl5/IkiWiki/Plugin/meta.pm.distrib /usr/share/perl5/IkiWiki
|
|||
+ my $page=shift;
|
||||
+ my $unescaped=shift;
|
||||
+
|
||||
+ print "debug1: $page\n";
|
||||
+
|
||||
+ if ($page =~ m#/#) {
|
||||
+ $page =~ s#^/##;
|
||||
+ $page =~ s#/index$##;
|
||||
|
@ -107,8 +105,6 @@ diff -c /usr/share/perl5/IkiWiki/Plugin/meta.pm.distrib /usr/share/perl5/IkiWiki
|
|||
+ $page=~s/(__(\d+)__|_)/$1 eq '_' ? ' ' : "&#$2;"/eg;
|
||||
+ }
|
||||
+
|
||||
+ print "debug2: $page\n";
|
||||
+
|
||||
+ return $page;
|
||||
+ } #}}}
|
||||
+
|
||||
|
|
Loading…
Reference in New Issue