mirror of
https://github.com/fish-shell/fish-shell
synced 2024-11-10 23:24:39 +00:00
9367d4ff71
This does not include checks/function.fish because that currently includes a "; end" in a message that indent would remove, breaking the test.
31 lines
855 B
Fish
31 lines
855 B
Fish
function dirh --description "Print the current directory history (the prev and next lists)"
|
|
set -l options h/help
|
|
argparse -n dirh --max-args=0 $options -- $argv
|
|
or return
|
|
|
|
if set -q _flag_help
|
|
__fish_print_help dirh
|
|
return 0
|
|
end
|
|
|
|
set -l dirc (count $dirprev)
|
|
if test $dirc -gt 0
|
|
set -l dirprev_rev $dirprev[-1..1]
|
|
# This can't be (seq $dirc -1 1) because of BSD.
|
|
set -l dirnum (seq 1 $dirc)
|
|
for i in $dirnum[-1..1]
|
|
printf '%2d) %s\n' $i $dirprev_rev[$i]
|
|
end
|
|
end
|
|
|
|
echo (set_color $fish_color_history_current)' ' $PWD(set_color normal)
|
|
|
|
set -l dirc (count $dirnext)
|
|
if test $dirc -gt 0
|
|
set -l dirnext_rev $dirnext[-1..1]
|
|
for i in (seq $dirc)
|
|
printf '%2d) %s\n' $i $dirnext_rev[$i]
|
|
end
|
|
end
|
|
echo
|
|
end
|