]> git.g-eek.se Git - interimap.git/commitdiff
wibble
authorGuilhem Moulin <guilhem@fripost.org>
Mon, 7 Sep 2015 23:02:23 +0000 (01:02 +0200)
committerGuilhem Moulin <guilhem@fripost.org>
Mon, 7 Sep 2015 23:02:23 +0000 (01:02 +0200)
interimap

index ed80b5afe1a98c7cf7ba0b1cdfef5e92107f8668..af8b7fdfe25ff597505c2684b215a81b69c7cf85 100755 (executable)
--- 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