From f426b21b6ab89d1e70fb4147ccb42fbd31b34969 Mon Sep 17 00:00:00 2001 From: John Denker Date: Wed, 18 Jul 2012 12:37:10 -0700 Subject: add "-r" (reverse) mode to mail-zap --- tools/mail-zap | 23 ++++++++++++++++++----- 1 file changed, 18 insertions(+), 5 deletions(-) (limited to 'tools') diff --git a/tools/mail-zap b/tools/mail-zap index 912d740..4467ef6 100755 --- a/tools/mail-zap +++ b/tools/mail-zap @@ -1,13 +1,26 @@ #! /bin/bash -if test -z "$*" ; then +todo="" +verb="--spam" +dest="spam" + +for arg in "$@" ; do + case "$arg" in + -r) verb="--forget" + dest="new" + ;; + *) todo="$todo $arg" + esac +done + +if test -z "$todo" ; then exit fi -mail-scan +subject "$@" +mail-scan +subject $todo -sa-learn --spam "$@" +sa-learn $verb $todo -for file in "$@" ; do - mv "$file" "$(dirname $file)/../spam/" +for file in $todo ; do + mv "$file" "$(dirname $file)/../$dest/" done -- cgit v1.2.3