diff options
| author | Tony Cook <tony@develop-help.com> | 2019-07-23 09:55:05 +1000 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2019-07-23 11:15:56 +1000 |
| commit | 43e5ab2e34fe55efd182c925309a4cf5ff2ec540 (patch) | |
| tree | 0f91fcea3df079387ea6adc0d30df611868e7aa2 | |
| parent | 23155e743c754ba1a72bdfc864ceaeaf7ce2448f (diff) | |
| download | perl-43e5ab2e34fe55efd182c925309a4cf5ff2ec540.tar.gz | |
Win32: set FOO lists values for all variables starting with FOO
I'd been testing setting FOOBAR to Unicode values, so this test was
failing due to the extra variable.
| -rw-r--r-- | t/op/magic.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/magic.t b/t/op/magic.t index 27c1d43da0..2a7a627d86 100644 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -104,7 +104,7 @@ END { eval '$ENV{"FOO"} = "hi there";'; # check that ENV is inited inside eval # cmd.exe will echo 'variable=value' but 4nt will echo just the value # -- Nikola Knezevic -if ($Is_MSWin32) { like `set FOO`, qr/^(?:FOO=)?hi there$/; } +if ($Is_MSWin32) { like `set FOO`, qr/^(?:FOO=)?hi there$/m; } elsif ($Is_VMS) { is `write sys\$output f\$trnlnm("FOO")`, "hi there\n"; } else { is `echo \$FOO`, "hi there\n"; } |