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

git-svn-id: svn://busybox.net/trunk/busybox@15753 69ca8d6d-28ef-0310-b511-8ec308f3f277

1 files changed, 6 insertions, 2 deletions

diff --git a/docs/autodocifier.pl b/docs/autodocifier.pl
index c39260acb..4acb6bdc8 100755
--- a/docs/autodocifier.pl
+++ b/docs/autodocifier.pl
@@ -21,8 +21,12 @@ sub continuation {
 # 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('',