[Lxr-commits] CVS: lxr Local.pm,1.16,1.17

[Dave B. <bro...@us...>]

Update of /cvsroot/lxr/lxr
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv526

Modified Files:
	Local.pm 
Log Message:
further javadoc tweaking

Index: Local.pm
===================================================================
RCS file: /cvsroot/lxr/lxr/Local.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- Local.pm	29 Jun 2004 17:45:57 -0000	1.16
+++ Local.pm	30 Jun 2004 19:19:45 -0000	1.17
@@ -118,10 +118,10 @@
 	return "\&nbsp\;" if ! $desc;
 	
 	# strip off any leading * s
-	$desc =~ s/^\s?\*\s?//mg;
+	$desc =~ s/^\s*\*\s?//mg;
 	
 	# Strip off @parameter lines
-	$desc =~ s/^\s?@\w+.*$//mg;
+	$desc =~ s/^\s*@\w+.*$//mg;
 	
 	# strip html tags (probably a way to do this all in one, but it's beyond my skill)
 	$desc =~ s#<[/\w]+(\s*\w+="[\w\s]*"\s*)*>##g;	# double quoted attributes
@@ -129,9 +129,9 @@
 	$desc =~ s#<[/\w]+(\s*\w+=[\w]*\s*)*>##g;	# no quotes on attributes
 	
 	# strip off some CVS keyword lines
-	foreach $keyword ('Workfile', 'Revision', 'Modtime', 'Author', 'Id', 'Date', 'Source')
+	foreach $keyword ('Workfile', 'Revision', 'Modtime', 'Author', 'Id', 'Date', 'Source', 'RCSfile')
 	{
-	    $desc =~ s/^\s?\$$keyword[\$:].*$//mg;
+	    $desc =~ s/^\s*\$$keyword[\$:].*$//mg;
 	}
 	
    }