--- loncom/build/lpml_parse.pl 2002/01/31 15:04:46 1.37 +++ loncom/build/lpml_parse.pl 2002/02/05 01:28:57 1.40 @@ -3,7 +3,7 @@ # The LearningOnline Network with CAPA # lpml_parse.pl - Linux Packaging Markup Language parser # -# $Id: lpml_parse.pl,v 1.37 2002/01/31 15:04:46 harris41 Exp $ +# $Id: lpml_parse.pl,v 1.40 2002/02/05 01:28:57 harris41 Exp $ # # Written by Scott Harrison, harris41@msu.edu # @@ -208,7 +208,7 @@ while ($token = $parser->get_token()) { $cleanstring.=$token->[4]; } if ($token->[4]=~/\/>$/) { - $hloc--; +# $hloc--; } } if ($token->[0] eq 'E') { @@ -1511,7 +1511,7 @@ sub format_filenames { } return ''; } -# ------------------------------------------------ Format specialnotice section +# ----------------------------------------------- Format specialnotices section sub format_specialnotices { $parser->get_tag('/specialnotices'); return '';