svn commit: trunk/busybox/docs

[landley at busybox.net]

Author: landley
Date: 2006-07-27 08:12:21 -0700 (Thu, 27 Jul 2006)
New Revision: 15753

Log:
And now, with a for loop, so it can handle the nested USE() case.


Modified:
   trunk/busybox/docs/autodocifier.pl


Changeset:
Modified: trunk/busybox/docs/autodocifier.pl
===================================================================
--- trunk/busybox/docs/autodocifier.pl	2006-07-27 15:02:58 UTC (rev 15752)
+++ trunk/busybox/docs/autodocifier.pl	2006-07-27 15:12:21 UTC (rev 15753)
@@ -21,8 +21,12 @@
 # regex && eval away unwanted strings from documentation
 sub beautify {
 	my $text = shift;
-	$text =~ s/SKIP_\w+\(.*?"\s*\)//sxg;
-	$text =~ s/USE_\w+\(\s*?(.*?)"\s*\)/$1"/sxg;
+	for (;;) {
+		my $text2 = $text;
+		$text =~ s/SKIP_\w+\(.*?"\s*\)//sxg;
+		$text =~ s/USE_\w+\(\s*?(.*?)"\s*\)/$1"/sxg;
+		last if ( $text2 eq $text );
+	}
 	$text =~ s/"\s*"//sg;
 	my @line = split("\n", $text);
 	$text = join('',