Minor cosmetic updates
[p5sagit/p5-mst-13.2.git] / lib / Cwd.pm
index 8a99da9..ee1bc28 100644 (file)
@@ -372,7 +372,7 @@ sub _qnx_abs_path {
         *abs_path      = \&_qnx_abs_path;
         *fast_abs_path = \&_qnx_abs_path;
     }
-    elsif ($^O =~ /cygwin/) {
+    elsif ($^O eq 'cygwin') {
         *getcwd        = \&cwd;
         *fastgetcwd    = \&cwd;
         *fastcwd       = \&cwd;