Fix failing op/magic.t test 157
authorSteve Hay <steve.m.hay@googlemail.com>
Wed, 20 Feb 2013 13:25:41 +0000 (13:25 +0000)
committerSteve Hay <steve.m.hay@googlemail.com>
Wed, 20 Feb 2013 13:25:41 +0000 (13:25 +0000)
Change 888a67f6b9 added manipulation of __NoNeSuCh2, but it gets
accidentally picked up by the 'set' command looking for __NoNeSuCh in test
157 because 'set' will display the value of *all* variables whose prefix
matches the name given to the command.

t/op/magic.t

index 5421d01..854790d 100644 (file)
@@ -647,10 +647,10 @@ SKIP: {
        }
 
        $ENV{__NoNeSuCh} = 'foo';
-       $ENV{__NoNeSuCh2} = 'foo';
        $0 = 'bar';
        env_is(__NoNeSuCh => 'foo', 'setting $0 does not break %ENV');
 
+       $ENV{__NoNeSuCh2} = 'foo';
        $ENV{__NoNeSuCh2} = undef;
        env_is(__NoNeSuCh2 => '', 'setting a key as undef does not delete it');