mirror of
https://github.com/fish-shell/fish-shell
synced 2024-12-28 05:43:11 +00:00
33a9659cd1
Missed in 368017905
(builtin commandline: -x for expanded tokens, supplanting
-o, 2024-01-06).
40 lines
1,004 B
Fish
40 lines
1,004 B
Fish
function __fish_seen_argument --description 'Check whether argument is used'
|
|
argparse --ignore-unknown 's/short=+' 'o/old=+' 'l/long=+' 'w/windows=+' -- $argv
|
|
|
|
set --local tokens (commandline --current-process --tokens-expanded --cut-at-cursor)
|
|
set --erase tokens[1]
|
|
|
|
for t in $tokens
|
|
for s in $_flag_s
|
|
if string match --regex --quiet -- "^-[A-z0-9]*"$s"[A-z0-9]*\$" $t
|
|
return 0
|
|
end
|
|
end
|
|
|
|
for o in $_flag_o
|
|
if string match --quiet -- "-$o" $t
|
|
return 0
|
|
end
|
|
end
|
|
|
|
for l in $_flag_l
|
|
if string match --quiet -- "--$l" $t
|
|
return 0
|
|
end
|
|
end
|
|
|
|
for w in $_flag_w
|
|
if string match --quiet -- "/$w" $t
|
|
return 0
|
|
end
|
|
end
|
|
|
|
for raw_arg in $argv
|
|
if string match --quiet -- $t $raw_arg
|
|
return 0
|
|
end
|
|
end
|
|
end
|
|
|
|
return 1
|
|
end
|