Fix to Pod::Usage to work with all recent Pod::Text versions. Also

[perl5.git] / lib / Pod / t / Usage.t

diff --git a/lib/Pod/t/Usage.t b/lib/Pod/t/Usage.t
index 343a0a7..2cabb55 100644 (file)
--- a/lib/Pod/t/Usage.t
+++ b/lib/Pod/t/Usage.t
@@ -36,7 +36,7 @@ SKIP: {
         pod2usage({ -verbose => 0, -exit => 'noexit', 
                     -output => \*FAKEOUT, -input => $file });
     };
-    like( $@, qr/^Can't open $file:/, 
+    like( $@, qr/^Can't open $file/, 
           'File not found without -pathlist' );
 
     eval {