Return-Path: Delivered-To: apmail-httpd-test-cvs-archive@www.apache.org Received: (qmail 32517 invoked from network); 20 Aug 2004 11:32:32 -0000 Received: from hermes.apache.org (HELO mail.apache.org) (209.237.227.199) by minotaur-2.apache.org with SMTP; 20 Aug 2004 11:32:32 -0000 Received: (qmail 58609 invoked by uid 500); 20 Aug 2004 11:32:32 -0000 Delivered-To: apmail-httpd-test-cvs-archive@httpd.apache.org Received: (qmail 58559 invoked by uid 500); 20 Aug 2004 11:32:32 -0000 Mailing-List: contact test-cvs-help@httpd.apache.org; run by ezmlm Precedence: bulk Reply-To: test-dev@httpd.apache.org list-help: list-unsubscribe: list-post: Delivered-To: mailing list test-cvs@httpd.apache.org Received: (qmail 58545 invoked by uid 99); 20 Aug 2004 11:32:31 -0000 X-ASF-Spam-Status: No, hits=-2.8 required=10.0 tests=ALL_TRUSTED,NO_REAL_NAME X-Spam-Check-By: apache.org Received: from [209.237.227.194] (HELO minotaur.apache.org) (209.237.227.194) by apache.org (qpsmtpd/0.27.1) with SMTP; Fri, 20 Aug 2004 04:32:31 -0700 Received: (qmail 32498 invoked by uid 1582); 20 Aug 2004 11:32:30 -0000 Date: 20 Aug 2004 11:32:30 -0000 Message-ID: <20040820113230.32496.qmail@minotaur.apache.org> From: jorton@apache.org To: httpd-test-cvs@apache.org Subject: cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestConfig.pm X-Virus-Checked: Checked X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N 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"]; }