svn commit: r224486 - /spamassassin/trunk/masses/mboxget

[jm...@apache.org]

Author: jm
Date: Sat Jul 23 10:51:09 2005
New Revision: 224486

URL: http://svn.apache.org/viewcvs?rev=224486&view=rev
Log:
mboxget was failing on maildir/mbox files that had filenames ending in '.\d+'

Modified:
    spamassassin/trunk/masses/mboxget

Modified: spamassassin/trunk/masses/mboxget
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/masses/mboxget?rev=224486&r1=224485&r2=224486&view=diff
==============================================================================
--- spamassassin/trunk/masses/mboxget (original)
+++ spamassassin/trunk/masses/mboxget Sat Jul 23 10:51:09 2005
@@ -60,7 +60,13 @@
 
 sub handle_input {
   my $where = shift;
-  my ($file, $offset) = ($where =~ m/(.*?)(?:\.(\d+))?$/);
+  my ($file, $offset);
+
+  if (-f $where) {
+    ($file, $offset) = ($where);
+  } else {
+    ($file, $offset) = ($where =~ m/(.*?)(?:\.(\d+))?$/);
+  }
 
   if ($file =~ /\.gz$/) {
     open (INPUT, "gunzip -cd $file |") or mywarn "gunzip $file failed: $!";