mirror of
https://github.com/fish-shell/fish-shell
synced 2025-01-12 13:08:49 +00:00
83b0294fc9
On ctrl-l we send `\e[2J` (Erase in Display). Some terminals interpret this to scroll the screen content instead of clearing it. This happens on VTE-based terminals like gnome-terminal for example. The traditional behavior of ctrl-l erasing the screen (but not the rest of the scrollback) is weird because: 1. `ctrl-l` is the easiest and most portable way to push the prompt to the top (and repaint after glitches I guess). But it's also a destructive action, truncating scrollback. I use it for scrolling and am frequently surprised when my scroll back is missing information. 2. the amount of lines erased depends on the window size. It would be more intuitive to erase by prompts, or erase the text in the terminal selection. Let's use scrolling behavior on all terminals. The new command could also be named "push-to-scrollback", for consistency with others. But if we anticipate a want to add other scrollback-related commands, "scrollback-push" is better. This causes tests/checks/tmux-history-search.fish to fail; that test seems pretty broken; M-d (alt-d) is supposed to delete the current search match but there is a rogue "echo" that is supposed to invalidate the search match. I'm not sure how that ever worked. Also, pexepect doesn't seem to support cursor position reporting, so work around that. Ref: https://codeberg.org/dnkl/foot/wiki#how-do-i-make-ctrl-l-scroll-the-content-instead-of-erasing-it as of wiki commit b57489e298f95d037fdf34da00ea60a5e8eafd6d Closes #10934
128 lines
5.8 KiB
Fish
128 lines
5.8 KiB
Fish
function __fish_shared_key_bindings -d "Bindings shared between emacs and vi mode"
|
|
set -l legacy_bind bind
|
|
# These are some bindings that are supposed to be shared between vi mode and default mode.
|
|
# They are supposed to be unrelated to text-editing (or movement).
|
|
# This takes $argv so the vi-bindings can pass the mode they are valid in.
|
|
|
|
if contains -- -h $argv
|
|
or contains -- --help $argv
|
|
echo "Sorry but this function doesn't support -h or --help" >&2
|
|
return 1
|
|
end
|
|
|
|
bind --preset $argv ctrl-y yank
|
|
or return # protect against invalid $argv
|
|
bind --preset $argv alt-y yank-pop
|
|
|
|
# Left/Right arrow
|
|
bind --preset $argv right forward-char
|
|
bind --preset $argv left backward-char
|
|
$legacy_bind --preset $argv -k right forward-char
|
|
$legacy_bind --preset $argv -k left backward-char
|
|
|
|
# Ctrl-left/right - these also work in vim.
|
|
bind --preset $argv ctrl-right forward-word
|
|
bind --preset $argv ctrl-left backward-word
|
|
|
|
bind --preset $argv pageup beginning-of-history
|
|
bind --preset $argv pagedown end-of-history
|
|
$legacy_bind --preset $argv -k ppage beginning-of-history
|
|
$legacy_bind --preset $argv -k npage end-of-history
|
|
|
|
# Interaction with the system clipboard.
|
|
bind --preset $argv ctrl-x fish_clipboard_copy
|
|
bind --preset $argv ctrl-v fish_clipboard_paste
|
|
|
|
bind --preset $argv escape cancel
|
|
bind --preset $argv ctrl-\[ cancel
|
|
bind --preset $argv tab complete
|
|
bind --preset $argv ctrl-i complete
|
|
bind --preset $argv ctrl-s pager-toggle-search
|
|
# shift-tab does a tab complete followed by a search.
|
|
bind --preset $argv shift-tab complete-and-search
|
|
$legacy_bind --preset $argv -k btab complete-and-search
|
|
bind --preset $argv shift-delete history-pager-delete or backward-delete-char
|
|
$legacy_bind --preset $argv -k sdc history-pager-delete or backward-delete-char
|
|
|
|
bind --preset $argv down down-or-search
|
|
$legacy_bind --preset $argv -k down down-or-search
|
|
bind --preset $argv up up-or-search
|
|
$legacy_bind --preset $argv -k up up-or-search
|
|
|
|
bind --preset $argv shift-right forward-bigword
|
|
bind --preset $argv shift-left backward-bigword
|
|
$legacy_bind --preset $argv -k sright forward-bigword
|
|
$legacy_bind --preset $argv -k sleft backward-bigword
|
|
|
|
bind --preset $argv alt-right nextd-or-forward-token
|
|
bind --preset $argv alt-left prevd-or-backward-token
|
|
|
|
bind --preset $argv alt-up history-token-search-backward
|
|
bind --preset $argv alt-down history-token-search-forward
|
|
# Bash compatibility
|
|
# https://github.com/fish-shell/fish-shell/issues/89
|
|
bind --preset $argv alt-. history-token-search-backward
|
|
|
|
bind --preset $argv alt-l __fish_list_current_token
|
|
bind --preset $argv alt-o __fish_preview_current_file
|
|
bind --preset $argv alt-w __fish_whatis_current_token
|
|
bind --preset $argv ctrl-l scrollback-push repaint
|
|
bind --preset $argv ctrl-c cancel-commandline
|
|
bind --preset $argv ctrl-u backward-kill-line
|
|
bind --preset $argv ctrl-w backward-kill-path-component
|
|
bind --preset $argv end end-of-line
|
|
bind --preset $argv home beginning-of-line
|
|
|
|
bind --preset $argv alt-d 'if test "$(commandline; printf .)" = \n.; __fish_echo dirh; else; commandline -f kill-word; end'
|
|
bind --preset $argv ctrl-d delete-or-exit
|
|
|
|
bind --preset $argv alt-s 'for cmd in sudo doas please; if command -q $cmd; fish_commandline_prepend $cmd; break; end; end'
|
|
|
|
# Allow reading manpages by pressing f1 (many GUI applications) or Alt+h (like in zsh).
|
|
bind --preset $argv f1 __fish_man_page
|
|
$legacy_bind --preset $argv -k f1 __fish_man_page
|
|
bind --preset $argv alt-h __fish_man_page
|
|
|
|
# This will make sure the output of the current command is paged using the default pager when
|
|
# you press Meta-p.
|
|
# If none is set, less will be used.
|
|
bind --preset $argv alt-p __fish_paginate
|
|
|
|
# Make it easy to turn an unexecuted command into a comment in the shell history. Also,
|
|
# remove the commenting chars so the command can be further edited then executed.
|
|
bind --preset $argv alt-# __fish_toggle_comment_commandline
|
|
|
|
# These keystrokes invoke an external editor on the command buffer.
|
|
bind --preset $argv alt-e edit_command_buffer
|
|
bind --preset $argv alt-v edit_command_buffer
|
|
|
|
# Bindings that are shared in text-insertion modes.
|
|
if not set -l index (contains --index -- -M $argv)
|
|
or test $argv[(math $index + 1)] = insert
|
|
|
|
# This is the default binding, i.e. the one used if no other binding matches
|
|
bind --preset $argv "" self-insert
|
|
or exit # protect against invalid $argv
|
|
|
|
# Space and other command terminators expands abbrs _and_ inserts itself.
|
|
bind --preset $argv space self-insert expand-abbr
|
|
bind --preset $argv ";" self-insert expand-abbr
|
|
bind --preset $argv "|" self-insert expand-abbr
|
|
bind --preset $argv "&" self-insert expand-abbr
|
|
bind --preset $argv ">" self-insert expand-abbr
|
|
bind --preset $argv "<" self-insert expand-abbr
|
|
bind --preset $argv shift-enter "commandline -i \n" expand-abbr
|
|
bind --preset $argv alt-enter "commandline -i \n" expand-abbr
|
|
bind --preset $argv ")" self-insert expand-abbr # Closing a command substitution.
|
|
bind --preset $argv ctrl-space 'test -n "$(commandline)" && commandline -i " "'
|
|
bind --preset $argv -k nul 'test -n "$(commandline)" && commandline -i " "'
|
|
# Shift-space behaves like space because it's easy to mistype.
|
|
bind --preset $argv shift-space 'commandline -i " "' expand-abbr
|
|
|
|
bind --preset $argv enter execute
|
|
bind --preset $argv ctrl-j execute
|
|
bind --preset $argv ctrl-m execute
|
|
# Make Control+Return behave like Return because it's easy to mistype after accepting an autosuggestion.
|
|
bind --preset $argv ctrl-enter execute
|
|
end
|
|
end
|