run/locale.t: Fix bareword error

This string should be in quotes to be properly eval'd.  Prior to this
patch this .t failed when run by hand as the bareword warning is made
fatal.

diff --git a/t/run/locale.t b/t/run/locale.t
index 44223174e8990142068d999686c29ad6aea2428a..0ecf9a941ee0bca88d0d3770ee6c935e49359882 100644 (file)
--- a/t/run/locale.t
+++ b/t/run/locale.t
@@ -141,7 +141,7 @@ EOF
         # this test is to prevent regression of [rt.perl.org #105784]
         fresh_perl_is(<<"EOF",
             BEGIN {
-                if($Config{d_setlocale}) {
+                if("$Config{d_setlocale}") {
                     require locale; import locale;
                 }
             }