12 lines
299 B
Plaintext
12 lines
299 B
Plaintext
#alias:new rename perl-rename
|
|
fn rename [@_args]{
|
|
e:perl-rename -n $@_args
|
|
use github.com/zzamboni/elvish-modules/util
|
|
if (util:y-or-n &style=bright-yellow 'Renommer? ') {
|
|
e:perl-rename -v $@args
|
|
echo (styled 'Succès' bold green)
|
|
} else {
|
|
echo (styled 'Abandon' bold red)
|
|
}
|
|
}
|