now it's possible to specify files to use mv_wrap on
this may be dangerous! do I check for files which are not in @source?
This commit is contained in:
parent
ddbd3b5eb2
commit
5c90dfb045
1 changed files with 7 additions and 2 deletions
|
|
@ -15,7 +15,7 @@ use POSIX qw(tmpnam);
|
|||
use Getopt::Long;
|
||||
|
||||
&cmdline;
|
||||
&read_cur_dir;
|
||||
unless (defined @source) { &read_cur_dir; }
|
||||
&lock;
|
||||
|
||||
if (@pattern) {
|
||||
|
|
@ -213,6 +213,11 @@ sub cmdline {
|
|||
|
||||
&help if $opt_h;
|
||||
if ($opt_f) { &read_pattern; }
|
||||
if (defined @ARGV) {
|
||||
foreach (@ARGV) {
|
||||
push @source, "$_\n";
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
sub help {
|
||||
|
|
@ -224,7 +229,7 @@ It basically lets you edit the names in a directory with an editor
|
|||
of your choice. By default this will be "vi", but it honors the EDITOR
|
||||
environment variable. Which in turn can be overridden with the -e option.
|
||||
|
||||
$0 [options]
|
||||
$0 [options] [--] [files]
|
||||
|
||||
At the moment it takes the following options:
|
||||
-h this help message
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue