fish-shell/share/functions/dirs.fish

function dirs --description 'Print directory stack'
    # process options
    if count $argv >/dev/null
        switch $argv[1]
            case -c
                # clear directory stack
                set -e -g dirstack
                return 0
        end
    end

    # replace $HOME with ~
    echo -n (echo (command pwd) | sed -e "s|^$HOME|~|")"  "
    for i in $dirstack
        echo -n (echo $i | sed -e "s|^$HOME|~|")"  "
    end
    echo
end