From: epg <>
Date: Sat, 3 Apr 2004 05:34:20 +0000 (+0000)
Subject: Drop -f (filter-only) and -s (spam-only) options.
X-Git-Url: https://diplodocus.org/git/minc/commitdiff_plain/901e1acca713655e1af4205e1eed389ea5136a5e?hp=62507996ef028c401cfc7ee3aff8d3e4583d7e13

Drop -f (filter-only) and -s (spam-only) options.
---

diff --git a/minc b/minc
index 2ef6a82..c2e522c 100755
--- a/minc
+++ b/minc
@@ -57,10 +57,6 @@ my @SPAM;
 Dump (using Data::Dumper) the FILTERS list and exit.  This is useful
 for testing the syntax of .mincfilter.
 
-=item B<-f>
-
-Filter only, then exit.  This is useful after running B<minc -s>.
-
 =item B<-h>
 
 Show help.
@@ -76,27 +72,18 @@ Print the filename of each message before checking it for spam.  This
 can be handy if a particular message is giving the spam checker a
 problem.
 
-=item B<-s>
-
-Process SPAM only, then exit, leaving all non-spam messages in the
-maildir.
-
 =back
 
 =cut
 
 my $dumpfilters = 0;
-my $filteronly = 0;
 our $run = 1;
 my $printfilenames = 0;
-my $spamonly = 0;
 
 our $opt_d;
-our $opt_f;
 our $opt_h;
 our $opt_n;
 our $opt_p;
-our $opt_s;                     # ;; # stupid cperl-mode
 
 if (not getopts('dfhnps')) {
     exit(2);
@@ -115,12 +102,6 @@ if ($opt_p) {
     $printfilenames = 1;
 }
 
-if ($opt_f) {
-    $filteronly = 1;
-} elsif ($opt_s) {              # ))){ # stupid cperl-mode
-    $spamonly = 1;
-}
-
 =head1 ENVIRONMENT
 
 =over 4