fish-shell/share/functions/history.fish

#
# Wrap the builtin history command to provide additional functionality.
#
function history --shadow-builtin --description "display or manipulate interactive command history"
    # no args or just -t? use pager if interactive.
    set -l cmd search
    set -l prefix_args ""
    set -l contains_args ""
    set -l search_mode none
    set -l time_args

    for i in (seq (count $argv))
        if set -q argv[$i]
            switch $argv[$i]
                case -d --delete
                    set cmd delete
                case -v --save
                    set cmd save
                case -l --clear
                    set cmd clear
                case -s --search
                    set cmd search
                case -m --merge
                    set cmd merge
                case -h --help
                    set cmd help
                case -t --with-time
                    set time_args "-t"
                case -p --prefix
                    set search_mode prefix
                    set prefix_args $argv[(math $i + 1)]
                case -c --contains
                    set search_mode contains
                    set contains_args $argv[(math $i + 1)]
                case --
                    set -e argv[1..$i]
                    break
                case "-*" "--*"
                    printf ( _ "%s: invalid option -- %s\n" ) history $argv[$i] >&2
                    return 1
            end
        end
    end

    switch $cmd
        case search
            if set -q argv[1]
                or begin
                    test -n $time_args
                    and contains $search_mode none
                    set -l pager less
                    set -q PAGER
                    and set pager $PAGER
                    builtin history $time_args | eval $pager
else
builtin history $time_args $argv
end
return


case delete
# Interactively delete history
set -l found_items ""
switch $search_mode
    case prefix:
        set found_items (builtin history --search --prefix $prefix_args)
    case contains
        set found_items (builtin history --search --contains $contains_args)
    case none
        builtin history $argv
        # Save changes after deleting item.
        builtin history --save
        return 0
end

set found_items_count (count $found_items)
if test $found_items_count -gt 0
    echo "[0] cancel"
    echo "[1] all"
    echo

    for i in (seq $found_items_count)
        printf "[%s] %s \n" (math $i + 1) $found_items[$i]
    end

    read --local --prompt "echo 'Delete which entries? > '" choice
    set choice (string split " " -- $choice)

    for i in $choice

        # Skip empty input, for example, if the user just hits return
        if test -z $i
            continue
        end

        # Following two validations could be embedded with "and" but I find the syntax
        # kind of weird.
        if not string match -qr '^[0-9]+$' $i
            printf "Invalid input: %s\n" $i
            continue
        end

        if test $i -gt (math $found_items_count + 1)
            printf "Invalid input : %s\n" $i
            continue
        end

        if test $i = "0"
            printf "Cancel\n"
            return
        else
            if test $i = "1"
                for item in $found_items
                    builtin history --delete $item
                end
                printf "Deleted all!\n"
            else
                builtin history --delete $found_items[(math $i - 1)]
            end

        end
    end
    # Save changes after deleting item(s).
    builtin history --save
end
case save
# Save changes to history file.
builtin history $argv
case merge
builtin history --merge
case help
builtin history --help
case clear
# Erase the entire history.
echo "Are you sure you want to clear history ? (y/n)"
read ch
if test $ch = "y"
    builtin history $argv
    echo "History cleared!"
end
end
end