WebGUI::HTML::makeAbsolute didn't handle closing slashes right.

This commit is contained in:
Yung Han Khoe 2007-01-26 16:31:25 +00:00
parent 60e40ebe12
commit ec2e7832f9

View file

@ -317,9 +317,11 @@ sub makeAbsolute {
$absolute .= "<".$tagname;
my $foundClosingSlash;
foreach (keys %$attr) {
if($_ eq '/') {
$absolute .= '/';
$foundClosingSlash = '1';
next;
}
if ($tag_attr{"$tagname $_"}) { # make this absolute
@ -327,7 +329,7 @@ sub makeAbsolute {
}
$absolute .= qq' $_="$attr->{$_}"';
}
$absolute .= '/' if ($foundClosingSlash);
$absolute .= '>';
};
HTML::Parser->new(