# if (the current HTML token is a start-tag) { my $slashclose = 0; # If set to 1, use XML-style empty tag marker # for tags like <name/>, pretend it's <name> and reinsert the slash later $slashclose = 1 if ($tag =~ s!/$!!); # . . . # if ($tag eq "lj-raw") { # Strip it out, but still register it as being open $opencount{$tag}++; } # if (the tag isn't an LJ-specific tag) { $slashclose = 1 if delete $hash->{'/'}; # } # . . . # if (we're going to send the tag to output) { if ($slashclose) { $newdata .= " /"; $opencount{$tag}--; } if ($allow) { $newdata .= ">"; $opencount{$tag}++; } # } # }The code seems to me to be saying that a tag like <code /> should result in $opencount{'code'} being decremented. That seems wrong; $opencount{'code'} should be neither incremented nor decremented, right? (The code seems to think that $opencount{'code'} is already getting incremented somewhere, so it should now decrement it; but that doesn't seem to me to be the case.)
Am I wrong, or is this an error in cleanhtml.pl? Thanks for any input!