]> diplodocus.org Git - minc/commitdiff
Make a couple of tiny adjustments to the early exit case for no new
authorepg <>
Thu, 30 Mar 2006 09:19:06 +0000 (09:19 +0000)
committerepg <>
Thu, 30 Mar 2006 09:19:06 +0000 (09:19 +0000)
messages so that $maildir/spam still gets cleared out.

minc

diff --git a/minc b/minc
index fbeba159db86af0d4d010fbdfdb54657eca33193..6c0aad26edcb5f6316b221387d4a3e7bef5a6e9b 100755 (executable)
--- a/minc
+++ b/minc
@@ -294,7 +294,7 @@ sub getfiles {
     }
 
     if (@result <= 2) {
     }
 
     if (@result <= 2) {
-        exit(0);
+        return ();
     }
 
     STDOUT->autoflush(1);
     }
 
     STDOUT->autoflush(1);
@@ -605,6 +605,7 @@ sub find_mh_folder {
 }
 
 sub filter_mail {
 }
 
 sub filter_mail {
+    @_ or return ();
     my $msgcount = @_ - 2; # don't count . and ..
     my $len = length($msgcount);
     my @baton;
     my $msgcount = @_ - 2; # don't count . and ..
     my $len = length($msgcount);
     my @baton;
@@ -795,7 +796,7 @@ MAIN: {
                 }
                 getfiles('.'));
 
                 }
                 getfiles('.'));
 
-    $run and update_dot_folders(\%folders);
+    $run and %folders and update_dot_folders(\%folders);
 
     maildir_spam();
 
 
     maildir_spam();