removing debug-lines.

master
Cord 2008-08-27 02:18:39 -04:00 committed by Joey Hess
parent fff0adf91f
commit ffa2913b45
1 changed files with 1 additions and 5 deletions

View File

@ -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;
+ } #}}}
+