fish-shell/share/functions/funcsave.fish

39 lines
991 B
Fish
Raw Normal View History

function funcsave --description "Save the current definition of all specified functions to file"
set -l options h/help 'd/directory='
2018-11-22 11:43:35 +00:00
argparse -n funcsave $options -- $argv
2017-07-13 20:35:26 +00:00
or return
2017-07-13 20:35:26 +00:00
if set -q _flag_help
__fish_print_help funcsave
2017-07-13 20:35:26 +00:00
return 0
end
if set -q _flag_directory
set funcdir $_flag_directory
else
set funcdir $__fish_config_dir/functions
end
2018-11-22 11:43:35 +00:00
if not set -q argv[1]
printf (_ "%ls: Expected at least %d args, got only %d\n") funcsave 1 0
return 1
end
if not mkdir -p $funcdir
printf (_ "%s: Could not create configuration directory '%s'\n") funcsave $funcdir
return 1
end
2017-07-25 21:02:50 +00:00
set -l retval 0
2017-07-13 20:35:26 +00:00
for funcname in $argv
if functions -q -- $funcname
functions -- $funcname >$funcdir/$funcname.fish
else
2017-07-13 20:35:26 +00:00
printf (_ "%s: Unknown function '%s'\n") funcsave $funcname
2017-07-25 21:02:50 +00:00
set retval 1
end
end
2017-07-25 21:02:50 +00:00
return $retval
end