From: Guilhem Moulin Date: Mon, 7 Sep 2015 23:02:23 +0000 (+0200) Subject: wibble X-Git-Url: https://git.g-eek.se/?a=commitdiff_plain;h=8c9328834e3340c1d3b20a5d9567fe8cd27f6d82;p=interimap.git wibble --- diff --git a/interimap b/interimap index ed80b5a..af8b7fd 100755 --- a/interimap +++ b/interimap @@ -60,8 +60,9 @@ my $COMMAND = do { usage(1) if $#command>0; $command[0] }; -usage(1) if defined $COMMAND and (($COMMAND eq 'delete' and !@ARGV) or $COMMAND eq 'rename' and $#ARGV != 1); +usage(1) if defined $COMMAND and (($COMMAND eq 'delete' and !@ARGV) or ($COMMAND eq 'rename' and $#ARGV != 1)); usage(1) if defined $COMMAND and defined $CONFIG{watch}; +usage(1) if $CONFIG{target} and !(defined $COMMAND and ($COMMAND eq 'delete'or $COMMAND eq 'rename')); $CONFIG{watch} = 60 if defined $CONFIG{watch} and $CONFIG{watch} == 0; @ARGV = map {uc $_ eq 'INBOX' ? 'INBOX' : $_ } @ARGV; # INBOX is case-insensitive