diff options
author | John Beppu <beppu@lbox.org> | 2001-04-05 20:03:33 +0000 |
---|---|---|
committer | John Beppu <beppu@lbox.org> | 2001-04-05 20:03:33 +0000 |
commit | 79359d87e86963607ea11dddd9b18cb43896b765 (patch) | |
tree | 1e24c8165d32a7e892f3461abd87f7aa7acafb4b /docs/autodocifier.pl | |
parent | 94e505485e7cd3a4061371774d9d66c65a053887 (diff) | |
download | busybox-w32-79359d87e86963607ea11dddd9b18cb43896b765.tar.gz busybox-w32-79359d87e86963607ea11dddd9b18cb43896b765.tar.bz2 busybox-w32-79359d87e86963607ea11dddd9b18cb43896b765.zip |
- autodocifier.pl :: continuation() was modified such that '#'
is handled correctly.
Diffstat (limited to 'docs/autodocifier.pl')
-rwxr-xr-x | docs/autodocifier.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/docs/autodocifier.pl b/docs/autodocifier.pl index c119215d4..9133afb98 100755 --- a/docs/autodocifier.pl +++ b/docs/autodocifier.pl | |||
@@ -11,7 +11,7 @@ sub continuation { | |||
11 | while (<$fh>) { | 11 | while (<$fh>) { |
12 | my $s = $_; | 12 | my $s = $_; |
13 | $s =~ s/\\\s*$//; | 13 | $s =~ s/\\\s*$//; |
14 | $s =~ s/#.*$//; | 14 | #$s =~ s/#.*$//; |
15 | push @line, $s; | 15 | push @line, $s; |
16 | last unless (/\\\s*$/); | 16 | last unless (/\\\s*$/); |
17 | } | 17 | } |
@@ -31,7 +31,7 @@ sub beautify { | |||
31 | s/"//g; | 31 | s/"//g; |
32 | s/%/%%/g; | 32 | s/%/%%/g; |
33 | s/\$/\\\$/g; | 33 | s/\$/\\\$/g; |
34 | eval qq[ sprintf(qq#$_#) ] | 34 | eval qq[ sprintf(qq{$_}) ] |
35 | } @line | 35 | } @line |
36 | ); | 36 | ); |
37 | return $text; | 37 | return $text; |
@@ -275,4 +275,4 @@ John BEPPU <beppu@lineo.com> | |||
275 | 275 | ||
276 | =cut | 276 | =cut |
277 | 277 | ||
278 | # $Id: autodocifier.pl,v 1.18 2001/04/05 19:35:17 beppu Exp $ | 278 | # $Id: autodocifier.pl,v 1.19 2001/04/05 20:03:33 beppu Exp $ |