diff options
-rw-r--r-- | lib/File/DosGlob.pm | 6 | ||||
-rw-r--r-- | pod/perldelta.pod | 6 |
2 files changed, 8 insertions, 4 deletions
diff --git a/lib/File/DosGlob.pm b/lib/File/DosGlob.pm index e6d548ee25..111ec20dbe 100644 --- a/lib/File/DosGlob.pm +++ b/lib/File/DosGlob.pm @@ -6,7 +6,7 @@ package File::DosGlob; -our $VERSION = '1.07'; +our $VERSION = '1.08'; use strict; use warnings; @@ -166,9 +166,7 @@ sub glob { } } for ( @pat ) { - s/\\{/{/g; - s/\\}/}/g; - s/\\,/,/g; + s/\\([{},])/$1/g; } #print join ("\n", @pat). "\n"; diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 946f3f77dc..4f3483e620 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -103,6 +103,12 @@ XXX =item * +L<File::DosGlob> has been upgraded from version 1.07 to 1.08. + +There are no visible changes, only minor internal refactorings. + +=item * + L<IO> has been upgraded from version 1.25_06 to version 1.25_07. C<sync()> can now be called on read only file handles [perl #64772]. |