2007-04-17 05:44:53 +08:00
|
|
|
function funcsave --description "Save the current definition of all specified functions to file"
|
2017-07-14 04:35:26 +08:00
|
|
|
set -l options 'h/help'
|
|
|
|
argparse -n funcsave --min-args=1 $options -- $argv
|
|
|
|
or return
|
2006-10-28 06:50:04 +08:00
|
|
|
|
2017-07-14 04:35:26 +08:00
|
|
|
if set -q _flag_help
|
2016-11-28 13:27:22 +08:00
|
|
|
__fish_print_help funcsave
|
2017-07-14 04:35:26 +08:00
|
|
|
return 0
|
2016-11-28 13:27:22 +08:00
|
|
|
end
|
|
|
|
|
|
|
|
set -l configdir ~/.config
|
|
|
|
if set -q XDG_CONFIG_HOME
|
|
|
|
set configdir $XDG_CONFIG_HOME
|
|
|
|
end
|
|
|
|
|
|
|
|
for i in $configdir $configdir/fish $configdir/fish/functions
|
|
|
|
if not test -d $i
|
|
|
|
if not command mkdir $i >/dev/null
|
|
|
|
printf (_ "%s: Could not create configuration directory\n") funcsave
|
|
|
|
return 1
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
2017-07-26 05:02:50 +08:00
|
|
|
set -l retval 0
|
2017-07-14 04:35:26 +08:00
|
|
|
for funcname in $argv
|
|
|
|
if functions -q -- $funcname
|
2017-07-26 05:02:50 +08:00
|
|
|
functions -- $funcname >$configdir/fish/functions/$funcname.fish
|
2016-11-28 13:27:22 +08:00
|
|
|
else
|
2017-07-14 04:35:26 +08:00
|
|
|
printf (_ "%s: Unknown function '%s'\n") funcsave $funcname
|
2017-07-26 05:02:50 +08:00
|
|
|
set retval 1
|
2016-11-28 13:27:22 +08:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
2017-07-26 05:02:50 +08:00
|
|
|
return $retval
|
2006-10-28 06:50:04 +08:00
|
|
|
end
|
|
|
|
|