commit - 06fecd0193fdad55e9a04af4e589869a08d701b1
commit + 6a455fdf1d5ab9f8a08dbe09c640435a3067cb47
blob - 3f036b416034529d5b4165ae4c504d418f18b72f
blob + 15e641811b591978216c4fa291469473cf966179
--- plass
+++ plass
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 ..."],
);
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 {
Rename a password entry, doesn't work with directories. I<from> must
exist and I<to> mustn't.
-=item B<rm> I<entry>
+=item B<rm> I<entries...>
Remove the password I<entry> from the store.