mirror of
https://github.com/fish-shell/fish-shell
synced 2024-12-27 05:13:10 +00:00
83932441bb
This is the one place in fish where we use a `\` in the replacement of a `string replace -r`, so we'll have to check the feature.
43 lines
1.5 KiB
Fish
43 lines
1.5 KiB
Fish
function fish_clipboard_paste
|
|
set -l data
|
|
if type -q pbpaste
|
|
set data (pbpaste)
|
|
else if type -q xsel
|
|
# Return if `xsel` failed.
|
|
# That way we don't print the redundant (and overly verbose for this) commandline error.
|
|
# Also require non-empty contents to not clear the buffer.
|
|
if not set data (xsel --clipboard 2>/dev/null)
|
|
return 1
|
|
end
|
|
else if type -q xclip
|
|
if not set data (xclip -selection clipboard -o 2>/dev/null)
|
|
return 1
|
|
end
|
|
else if type -q wl-paste
|
|
set data (wl-paste)
|
|
end
|
|
# Also split on \r to turn it into a newline,
|
|
# otherwise the output looks really confusing.
|
|
set data (string split \r -- $data)
|
|
|
|
# If the current token has an unmatched single-quote,
|
|
# escape all single-quotes (and backslashes) in the paste,
|
|
# in order to turn it into a single literal token.
|
|
#
|
|
# This eases pasting non-code (e.g. markdown or git commitishes).
|
|
if __fish_commandline_is_singlequoted
|
|
if status test-feature string-replace-fewer-backslashes
|
|
set data (string replace -ra "(['\\\])" '\\\\$1' -- $data)
|
|
else
|
|
set data (string replace -ra "(['\\\])" '\\\\\\\$1' -- $data)
|
|
end
|
|
end
|
|
if not string length -q -- (commandline -c)
|
|
# If we're at the beginning of the first line, trim whitespace from the start,
|
|
# so we don't trigger ignoring history.
|
|
set data (string trim -l -- $data)
|
|
end
|
|
if test -n "$data"
|
|
commandline -i -- $data
|
|
end
|
|
end
|