Comment tweak.
[p5sagit/p5-mst-13.2.git] / t / pod / find.t
index 1bac930..df36147 100644 (file)
@@ -53,6 +53,9 @@ if ($^O eq 'VMS') {
     }
     ok($count/($#result+1)-1,$#compare);
 }
+elsif ($^O eq 'dos') {
+    ok(lc $result,lc $compare);
+}
 else {
     ok($result,$compare);
 }