From: jocuri%softhome.net <>
Date: Sun, 5 Dec 2004 22:12:57 +0000 (+0000)
Subject: Patch for bug 271964: tests 1 and 3 from the testing suite shouldn't fail when $... 
X-Git-Tag: bugzilla-2.16.8~15
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6095808145b52c2ae44cfef9b7ae867c31d8dd65;p=thirdparty%2Fbugzilla.git

Patch for bug 271964: tests 1 and 3 from the testing suite shouldn't fail when $^X contains spaces; patch by me, r=jouni, a=justdave.
---

diff --git a/t/001compile.t b/t/001compile.t
index f662f0751e..7e0994439b 100644
--- a/t/001compile.t
+++ b/t/001compile.t
@@ -59,7 +59,7 @@ my $fh;
 }
 
 my @testitems = @Support::Files::testitems;
-my $perlapp = $^X;
+my $perlapp = "\"$^X\"";
 
 # Test the scripts by compiling them
 
diff --git a/t/003safesys.t b/t/003safesys.t
index 14de7c0305..896dcdd446 100644
--- a/t/003safesys.t
+++ b/t/003safesys.t
@@ -59,7 +59,7 @@ my $fh;
 }
 
 my @testitems = @Support::Files::testitems; 
-my $perlapp = $^X;
+my $perlapp = "\"$^X\"";
 
 foreach my $file (@testitems) {
     $file =~ s/\s.*$//; # nuke everything after the first space (#comment)