--- test/html-whatpm/parser-manakai.cgi 2008/04/12 15:57:56 1.7 +++ test/html-whatpm/parser-manakai.cgi 2008/07/18 14:44:17 1.8 @@ -49,7 +49,7 @@ my $onerror = sub { my (%opt) = @_; - print STDOUT "$opt{line},$opt{column},$opt{type}\n"; + print STDOUT "$opt{line},$opt{column},$opt{type};$opt{level};$opt{value}\n"; }; $doc = $dom->create_document; @@ -289,4 +289,4 @@ =cut -## $Date: 2008/04/12 15:57:56 $ +## $Date: 2008/07/18 14:44:17 $