commit 6a455fdf1d5ab9f8a08dbe09c640435a3067cb47 from: Omar Polo date: Wed Jun 29 14:02:46 2022 UTC allow to delete an arbitrary number of items commit - 06fecd0193fdad55e9a04af4e589869a08d701b1 commit + 6a455fdf1d5ab9f8a08dbe09c640435a3067cb47 blob - 3f036b416034529d5b4165ae4c504d418f18b72f blob + 15e641811b591978216c4fa291469473cf966179 --- plass +++ plass @@ -51,7 +51,7 @@ my %subcmd = ( gen => [\&cmd_gen, "[-nq] [-c chars] [-l length] entry"], got => [\&cmd_got, "args ..."], mv => [\&cmd_mv, "from to"], - rm => [\&cmd_rm, "entry"], + rm => [\&cmd_rm, "entries..."], tee => [\&cmd_tee, "[-q] entry"], tog => [\&cmd_tog, "args ..."], ); @@ -267,13 +267,15 @@ sub cmd_mv { sub cmd_rm { GetOptions('h|?' => \&usage) or usage; - usage if @ARGV ne 1; + usage unless @ARGV; - my $name = shift @ARGV; - my $file = name2file $name; + while (@ARGV) { + my $name = shift @ARGV; + my $file = name2file $name; - got_rm $file; - got_ci "-$name"; + got_rm $file; + got_ci "-$name"; + } } sub cmd_tee { @@ -359,7 +361,7 @@ I. Rename a password entry, doesn't work with directories. I must exist and I mustn't. -=item B I +=item B I Remove the password I from the store.