[svn:dbi] r12733 - dbi/trunk/lib/DBD

[hmbrand]

Author: hmbrand
Date: Fri May  1 07:56:44 2009
New Revision: 12733

Modified:
   dbi/trunk/lib/DBD/File.pm

Log:
don't discard too many matches. I will need myself

Modified: dbi/trunk/lib/DBD/File.pm
==============================================================================
--- dbi/trunk/lib/DBD/File.pm   (original)
+++ dbi/trunk/lib/DBD/File.pm   Fri May  1 07:56:44 2009
@@ -101,7 +101,7 @@
            }
        else {
            # File extension optional, skip if file with extension exists
-           grep m/$ext$/i, glob "$fqfn*"       and return;
+           grep m/$ext$/i, glob "$fqfn.*"      and return;
            $file =~ s/$ext$//i;
            }
        }