From 79359d87e86963607ea11dddd9b18cb43896b765 Mon Sep 17 00:00:00 2001 From: John Beppu Date: Thu, 5 Apr 2001 20:03:33 +0000 Subject: - autodocifier.pl :: continuation() was modified such that '#' is handled correctly. --- docs/autodocifier.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'docs/autodocifier.pl') diff --git a/docs/autodocifier.pl b/docs/autodocifier.pl index c119215..9133afb 100755 --- a/docs/autodocifier.pl +++ b/docs/autodocifier.pl @@ -11,7 +11,7 @@ sub continuation { while (<$fh>) { my $s = $_; $s =~ s/\\\s*$//; - $s =~ s/#.*$//; + #$s =~ s/#.*$//; push @line, $s; last unless (/\\\s*$/); } @@ -31,7 +31,7 @@ sub beautify { s/"//g; s/%/%%/g; s/\$/\\\$/g; - eval qq[ sprintf(qq#$_#) ] + eval qq[ sprintf(qq{$_}) ] } @line ); return $text; @@ -275,4 +275,4 @@ John BEPPU =cut -# $Id: autodocifier.pl,v 1.18 2001/04/05 19:35:17 beppu Exp $ +# $Id: autodocifier.pl,v 1.19 2001/04/05 20:03:33 beppu Exp $ -- cgit v1.1