eliminating further warnings from Configure.pl

Signed-off-by: Bernhard Schmalhofer <Bernhard.Schmalhofer@gmx.de>
bschmalhofer · Apr 20, 2009 · 123a4b1 · 123a4b1
1 parent 9951e7c
commit 123a4b1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Configure.pl b/Configure.pl
@@ -144,7 +144,7 @@ sub create_files {
 
         $config->{'win32_libparrot_copy'} = $^O eq 'MSWin32' ? 'copy $(BUILD_DIR)\libparrot.dll .' : '';
         $content =~ s/@(\w+)@/
-            defined $config->{$1} ? $config->{$1} : warn("'$1' is missing from parrot_config"), ''/ge;
+            defined $config->{$1} ? $config->{$1} : (warn("'$1' is missing from parrot_config"), '')/ge;
         if ($^O eq 'MSWin32') {
             $content =~ s{/}{\\}g;
         }