Test::More::is_deeply may do overloading (at least for TODOs), and
[perl.git] / ext / File / Glob / t / basic.t
index fd09992..bdb2c57 100755 (executable)
@@ -173,8 +173,8 @@ pass("Don't panic");
     chdir $dir
        or die "Could not chdir to $dir: $!";
     my(@glob_files) = glob("a*{d[e]}j");
-    local $TODO = "home-made glob doesn't do regexes" if $^O eq 'VMS';
-    is_deeply(\@glob_files, ['a_dej']);
     chdir $cwd
        or die "Could not chdir back to $cwd: $!";
+    local $TODO = "home-made glob doesn't do regexes" if $^O eq 'VMS';
+    is_deeply(\@glob_files, ['a_dej']);
 }