Skip to content
Browse files

Added quotes in case fudge path has spaces. (Tested on Linux and Win3…

…2 with Strawberry Perl environment, reviewed by Patrick Michaud and Jerry Gay.)

git-svn-id: http://svn.pugscode.org/pugs@20869 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent fbaed8b commit 4b5dc4f0de779ca554a40a6402863a98ecb0d5d3 deven committed Jun 18, 2008
Showing with 1 addition and 1 deletion.
  1. +1 −1 fudgeall
View
2 fudgeall
@@ -44,7 +44,7 @@ print join(' ',
map {
my $pick;
if ( $_ !~ m/\.$platform$/ ) {
- my $cmd = "$^X $fudge @opts $platform $_";
+ my $cmd = "$^X \"$fudge\" @opts $platform $_";
chomp( $pick = `$cmd` );
}
defined $pick ? $pick : ();

0 comments on commit 4b5dc4f

Please sign in to comment.
Something went wrong with that request. Please try again.