2006-02-08 09:20:05 +00:00
|
|
|
function __fish_move_last -d "Move the last element of a directory history from src to dest"
|
|
|
|
set -l src $argv[1]
|
|
|
|
set -l dest $argv[2]
|
|
|
|
|
|
|
|
set -l size_src (count $$src)
|
|
|
|
|
|
|
|
if test $size_src = 0
|
|
|
|
# Cannot make this step
|
|
|
|
printf (_ "Hit end of history...\n")
|
|
|
|
return 1
|
|
|
|
end
|
|
|
|
|
|
|
|
# Append current dir to the end of the destination
|
|
|
|
set -g (echo $dest) $$dest (command pwd)
|
|
|
|
|
|
|
|
set ssrc $$src
|
|
|
|
|
|
|
|
# Change dir to the last entry in the source dir-hist
|
|
|
|
builtin cd $ssrc[$size_src]
|
|
|
|
|
|
|
|
# Keep all but the last from the source dir-hist
|
2006-09-07 20:11:45 +00:00
|
|
|
set -e (echo $src)\[$size_src]
|
2006-02-08 09:20:05 +00:00
|
|
|
|
|
|
|
# All ok, return success
|
|
|
|
return 0
|
|
|
|
end
|
|
|
|
|