mirror of
https://github.com/fish-shell/fish-shell
synced 2024-11-15 09:27:38 +00:00
7659554dea
This removes the use of caret redirections from share/completions and share/functions, in preparation for dropping support in fish.
44 lines
1 KiB
Fish
44 lines
1 KiB
Fish
function nextd --description "Move forward in the directory history"
|
|
set -l options 'h/help' 'l/list'
|
|
argparse -n nextd --max-args=1 $options -- $argv
|
|
or return
|
|
|
|
if set -q _flag_help
|
|
__fish_print_help nextd
|
|
return 0
|
|
end
|
|
|
|
set -l times 1
|
|
if set -q argv[1]
|
|
if test $argv[1] -ge 0 2>/dev/null
|
|
set times $argv[1]
|
|
else
|
|
printf (_ "%s: The number of positions to skip must be a non-negative integer\n") nextd
|
|
return 1
|
|
end
|
|
end
|
|
|
|
# Traverse history
|
|
set -l code 1
|
|
for i in (seq $times)
|
|
# Try one step backward
|
|
if __fish_move_last dirnext dirprev
|
|
# We consider it a success if we were able to do at least 1 step
|
|
# (low expectations are the key to happiness ;)
|
|
set code 0
|
|
else
|
|
break
|
|
end
|
|
end
|
|
|
|
# Show history if needed
|
|
if set -q _flag_list
|
|
dirh
|
|
end
|
|
|
|
# Set direction for 'cd -'
|
|
test $code = 0
|
|
and set -g __fish_cd_direction prev
|
|
|
|
return $code
|
|
end
|