X-Git-Url: https://git.p6c8.net/devedit.git/blobdiff_plain/b13a251610d830e85842abcf9a0bdefdf4c7a328..6cb088cea794fc67941b4e174fe9ed80c8a45875:/modules/Tool.pm diff --git a/modules/Tool.pm b/modules/Tool.pm index 5ed1ba2..1cd2456 100644 --- a/modules/Tool.pm +++ b/modules/Tool.pm @@ -6,7 +6,7 @@ package Tool; # Some shared sub routines # # Author: Patrick Canterino -# Last modified: 2005-11-10 +# Last modified: 2008-04-25 # use strict; @@ -183,6 +183,8 @@ sub dos_wildcard_match($$) { my ($pattern,$string) = @_; + return 1 if($pattern eq '*'); + # The following part is stolen from File::DosGlob # escape regex metachars but not glob chars