Type + chemin absolu
This commit is contained in:
parent
6fdff9d140
commit
d178c54603
@ -16,7 +16,7 @@ edit:add-var winmail~ {|@argv|
|
||||
echo ' -k, --keep Conserve le fichier winmail.dat fourni en entrée (option par défaut)'
|
||||
echo ' -r, --remove Supprime le fichier winmail.dat une fois le programme terminé'
|
||||
echo ''
|
||||
echo 'Si le fichier de données winmail.dat n’est pas, utilise le winmail.dat du répertoire courant, si trouvé'
|
||||
echo 'Si le fichier de données winmail.dat n’est pas défini, utilise le winmail.dat du répertoire courant, si trouvé'
|
||||
}
|
||||
|
||||
each {|e|
|
||||
@ -28,12 +28,12 @@ edit:add-var winmail~ {|@argv|
|
||||
print_help
|
||||
exit
|
||||
} else {
|
||||
set data = $e
|
||||
set data = (path:abs $e)
|
||||
}
|
||||
} $argv
|
||||
|
||||
if (eq $data '') {
|
||||
set data = $curdir'/winmail.dat'
|
||||
set data = (path:abs 'winmail.dat')
|
||||
}
|
||||
|
||||
if (not (path:is-regular $data)) {
|
||||
|
Loading…
Reference in New Issue
Block a user