MyDynaWeb CVS: htdocs xbtheria

[mdw c. <myd...@li...>]

MyDynaWeb CVS committal

Author  : xbtheria
Project : mydynaweb
Module  : htdocs

Dir     : mydynaweb/htdocs


Modified Files:
	ezphpdoc-1.0.pl 


Log Message:
I've added a line to rip off "*" at the beginning of long comment sections.
like this:
/*
 * Here, now it vanishes, provided there is a space after it( like here, a way
 * to avoid ripping pointer-like stuff (in case there would be any).
 */

===================================================================
RCS file: /cvsroot/mydynaweb/mydynaweb/htdocs/ezphpdoc-1.0.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -3 -r1.9 -r1.10
--- ezphpdoc-1.0.pl	2001/12/09 15:52:48	1.9
+++ ezphpdoc-1.0.pl	2001/12/10 16:32:54	1.10
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# $Id: ezphpdoc-1.0.pl,v 1.9 2001/12/09 15:52:48 bligneri Exp $
+# $Id: ezphpdoc-1.0.pl,v 1.10 2001/12/10 16:32:54 xbtheria Exp $
 #
 # A script for parsing php classes 
 # and for making html documentation from it.
@@ -800,7 +800,7 @@
 
 
 		}
-							
+		# todo: Here is the place to set any simple \tags ?? nope. 					
 		$functionDescription =~ s/\{in\}/\<b\>In:\<\/b\>\<blockquote\>$in\<\/blockquote\>/;
   		$functionDescription =~ s/\{out\}/\<b\>Out:\<\/b\>\<blockquote\>$out\<\/blockquote\>/;
   		$functionDescription =~ s/\{return\}/\<b\>Return:\<\/b\>\<blockquote\>$return\<\/blockquote\>/;
@@ -1254,7 +1254,9 @@
 		$tmpDesc = $_;
 		$tmpDesc =~ s/\/\*\!//;
 		$tmpDesc =~ s/\*\///;
-#		$tmpDesc =~ s/^\s+//;
+		$tmpDesc =~ s/^(\s|\t){0,}\*( |\n)//;
+		#$tmpDesc =~ s/^ \*//;
+		#$tmpDesc =~ s/^\s+//;// to kill newlines
 
 		$classDescription = $classDescription . $tmpDesc;
 	    }
@@ -1302,6 +1304,8 @@
 			$tmpDesc = $_;
 			$tmpDesc =~ s/\/\*\!//;
 			$tmpDesc =~ s/\*\///;
+		$tmpDesc =~ s/^(\s|\t){0,}\*( |\n)//;
+		#$tmpDesc =~ s/^(\s|\t){0,}\* //;
 #  			$tmpDesc =~ s/^\s+//;
 
 			$functionDescription = $functionDescription . $tmpDesc;