Photos
Blog
Projects
vanrenterghem.biz
projects
/
git.ikiwiki.info.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Rebuild for jessie-backports, no source changes (Closes: #807452)
[git.ikiwiki.info.git]
/
IkiWiki
/
Plugin
/
htmlbalance.pm
diff --git
a/IkiWiki/Plugin/htmlbalance.pm
b/IkiWiki/Plugin/htmlbalance.pm
index 261e273aab55eff23790a44ee7f460a70f6eba05..da450eea7ef691c8f16ed4e5a20a2603b0491c22 100644
(file)
--- a/
IkiWiki/Plugin/htmlbalance.pm
+++ b/
IkiWiki/Plugin/htmlbalance.pm
@@
-10,7
+10,6
@@
package IkiWiki::Plugin::htmlbalance;
use warnings;
use strict;
use IkiWiki 3.00;
use warnings;
use strict;
use IkiWiki 3.00;
-use HTML::TreeBuilder;
use HTML::Entities;
sub import {
use HTML::Entities;
sub import {
@@
-30,6
+29,8
@@
sub sanitize (@) {
my %params=@_;
my $ret = '';
my %params=@_;
my $ret = '';
+ eval q{use HTML::TreeBuilder};
+ error $@ if $@;
my $tree = HTML::TreeBuilder->new();
$tree->ignore_unknown(0);
$tree->ignore_ignorable_whitespace(0);
my $tree = HTML::TreeBuilder->new();
$tree->ignore_unknown(0);
$tree->ignore_ignorable_whitespace(0);
@@
-42,7
+43,7
@@
sub sanitize (@) {
my @nodes = $tree->disembowel();
foreach my $node (@nodes) {
if (ref $node) {
my @nodes = $tree->disembowel();
foreach my $node (@nodes) {
if (ref $node) {
- $ret .= $node->as_
XML(
);
+ $ret .= $node->as_
HTML(undef, '', {}
);
chomp $ret;
$node->delete();
}
chomp $ret;
$node->delete();
}