jorton 2004/08/20 04:32:30
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
shell_ready: fix, optimise, and prevent emacs confusion.
Submitted by: Stas
Revision Changes Path
1.240 +1 -1
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.239
retrieving revision 1.240
diff -d -w -u -r1.239 -r1.240
--- TestConfig.pm 15 Aug 2004 23:19:57 -0000 1.239
+++ TestConfig.pm 20 Aug 2004 11:32:30 -0000 1.240
@@ -1754,7 +1754,7 @@
# escape quotes)
sub shell_ready {
my $arg = shift;
- $arg =~ s/"/\"/g;
+ $arg =~ s!\\?"!\\"!g;
return qq["$arg"];
}