diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-08-28 18:17:59 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-08-28 18:17:59 +0000 |
commit | 4895955ceaf264c5f17b10c4009e1ab1afcc55ee (patch) | |
tree | 4f8553a9007b263e0b44afd0b9d0cbe8b5cf7b88 /IkiWiki/Plugin/htmltidy.pm | |
parent | e3a6ff004474cacb3e7a69a37696a65ebf1e2fcd (diff) | |
download | ikiwiki-4895955ceaf264c5f17b10c4009e1ab1afcc55ee.tar ikiwiki-4895955ceaf264c5f17b10c4009e1ab1afcc55ee.tar.gz |
* Change htmlize, format, and sanitize hooks to use named parameters.
Diffstat (limited to 'IkiWiki/Plugin/htmltidy.pm')
-rw-r--r-- | IkiWiki/Plugin/htmltidy.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/IkiWiki/Plugin/htmltidy.pm b/IkiWiki/Plugin/htmltidy.pm index eb8f9d3d3..079da7b49 100644 --- a/IkiWiki/Plugin/htmltidy.pm +++ b/IkiWiki/Plugin/htmltidy.pm @@ -16,7 +16,9 @@ sub import { #{{{ IkiWiki::hook(type => "sanitize", id => "tidy", call => \&sanitize); } # }}} -sub sanitize ($) { #{{{ +sub sanitize (@) { #{{{ + my %params=@_; + my $tries=10; while (1) { eval { @@ -26,14 +28,14 @@ sub sanitize ($) { #{{{ $tries--; if ($tries < 1) { IkiWiki::debug("failed to run tidy: $@"); - return shift; + return $params{content}; } } # open2 doesn't respect "use open ':utf8'" binmode (IN, ':utf8'); binmode (OUT, ':utf8'); - print OUT shift; + print OUT $params{content}; close OUT; local $/ = undef; |