projects
/
gruntmaster-page.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
57566ce
)
Mark tr td th as having optional end tags
author
Marius Gavrilescu
<marius@ieval.ro>
Sat, 11 Apr 2015 12:26:11 +0000
(15:26 +0300)
committer
Marius Gavrilescu
<marius@ieval.ro>
Sat, 11 Apr 2015 12:26:11 +0000
(15:26 +0300)
lib/Plack/App/Gruntmaster/HTML.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/Plack/App/Gruntmaster/HTML.pm
b/lib/Plack/App/Gruntmaster/HTML.pm
index d6f6c254d7c4fecfba70277e3202a07df1ada3fc..bcd1a887cdb20b2b9a09b27021d83e699e78a81d 100644
(file)
--- a/
lib/Plack/App/Gruntmaster/HTML.pm
+++ b/
lib/Plack/App/Gruntmaster/HTML.pm
@@
-9,6
+9,8
@@
use HTML::TreeBuilder;
use POSIX qw//;
use Data::Dumper qw/Dumper/;
use POSIX qw//;
use Data::Dumper qw/Dumper/;
+my $optional_end_tags = {%HTML::Tagset::optionalEndTag, tr => 1, td => 1, th => 1};
+
sub ftime ($) { POSIX::strftime '%c', localtime shift }
sub literal ($) {
my ($html) = @_;
sub ftime ($) { POSIX::strftime '%c', localtime shift }
sub literal ($) {
my ($html) = @_;
@@
-16,7
+18,7
@@
sub literal ($) {
my $b = HTML::TreeBuilder->new;
$b->ignore_unknown(0);
$b->parse($html);
my $b = HTML::TreeBuilder->new;
$b->ignore_unknown(0);
$b->parse($html);
- HTML::Element::Library::super_literal $b->guts->as_HTML;
+ HTML::Element::Library::super_literal $b->guts->as_HTML
(undef, undef, $optional_end_tags)
;
}
sub HTML::Element::edit_href {
}
sub HTML::Element::edit_href {
@@
-84,7
+86,7
@@
sub _render {
$_->detach for $tree->look_down(static => $args{static} ? 'no' : 'yes');
$_->attr('static', undef) for $tree->look_down(sub {$_[0]->attr('static')});
$_->attr('smap', undef) for $tree->look_down(sub {$_[0]->attr('smap')});
$_->detach for $tree->look_down(static => $args{static} ? 'no' : 'yes');
$_->attr('static', undef) for $tree->look_down(sub {$_[0]->attr('static')});
$_->attr('smap', undef) for $tree->look_down(sub {$_[0]->attr('smap')});
- $tree->as_HTML;
+ $tree->as_HTML
(undef, undef, $optional_end_tags)
;
}
sub process_skel {
}
sub process_skel {
This page took
0.0115 seconds
and
4
git commands to generate.