mirror of
https://github.com/fish-shell/fish-shell.git
synced 2026-05-06 06:01:14 -03:00
The overwhelming majority of localizable messages comes from
completions:
$ ls share/completions/ | wc -l
$ 1048
OTOH functions also contribute a small amount, mostly via their
descriptions (so usually just one per file).
$ ls share/functions/ | wc -l
$ 237
Most of these are private and almost never shown to the user, so it's
not worth bothering translators with them. So:
- Skip private (see the parent commit) and deprecated functions.
- Skip wrapper functions like grep (where the translation seems to
be provided by apropos), and even the English description is not
helpful.
- Assume that most real systems have "seq", "realpath" etc.,
so it's no use providing our own translations for our fallbacks.
- Mark fish's own functions as tier1, and some barely-used functiosn
and completions as tier3, so we can order them that way in
po/*.po. Most translators should only look at tier1 and tier2.
In future we could disable localization for tier3.
See the explanation at the bottom of
tests/checks/message-localization-tier-is-declared.fish
Part of #11833
76 lines
2.5 KiB
Fish
76 lines
2.5 KiB
Fish
# localization: tier1
|
|
function alias --description 'Creates a function wrapping a command'
|
|
set -l options h/help s/save
|
|
argparse -n alias --max-args=2 $options -- $argv
|
|
or return
|
|
|
|
if set -q _flag_help
|
|
__fish_print_help alias
|
|
return 0
|
|
end
|
|
|
|
set -l name
|
|
set -l body
|
|
|
|
if not set -q argv[1]
|
|
# Print the known aliases.
|
|
for func in (functions -n)
|
|
set -l output (functions $func | string match -r -- "^function .* --description (?:'alias (.*)'|alias\\\\ (.*))\$")
|
|
if set -q output[2]
|
|
set output (string replace -r -- '^'(string escape --style=regex -- $func)'[= ]' '' $output[2])
|
|
echo alias $func (string escape -- $output[1])
|
|
end
|
|
end
|
|
return 0
|
|
else if not set -q argv[2]
|
|
# Alias definition of the form "name=value".
|
|
set -l tmp (string split -m 1 "=" -- $argv) ""
|
|
set name $tmp[1]
|
|
set body $tmp[2]
|
|
else
|
|
# Alias definition of the form "name value".
|
|
set name $argv[1]
|
|
set body $argv[2]
|
|
end
|
|
|
|
# sanity check
|
|
if test -z "$name"
|
|
printf ( _ "%s: name cannot be empty\n") alias >&2
|
|
return 1
|
|
else if test -z "$body"
|
|
printf ( _ "%s: body cannot be empty\n") alias >&2
|
|
return 1
|
|
end
|
|
|
|
# Extract the first command from the body.
|
|
printf '%s\n' $body | read -l --list words
|
|
set -l first_word $words[1]
|
|
set -l last_word $words[-1]
|
|
|
|
# Prevent the alias from immediately running into an infinite recursion if
|
|
# $body starts with the same command as $name.
|
|
if test $first_word = $name
|
|
if contains $name (builtin --names)
|
|
set body "builtin $body"
|
|
else
|
|
set body "command $body"
|
|
end
|
|
end
|
|
set -l cmd_string (string escape -- "alias $argv")
|
|
|
|
# Do not define wrapper completion if we have "alias foo 'foo xyz'" or "alias foo 'sudo foo'"
|
|
# This is to prevent completions from recursively calling themselves (#7389).
|
|
# The latter will have rare false positives but it's more important to
|
|
# prevent recursion for this high-level command.
|
|
set -l wraps
|
|
if test $first_word != $name; and test $last_word != $name
|
|
set wraps --wraps (string escape -- $body)
|
|
end
|
|
|
|
# The function definition in split in two lines to ensure that a '#' can be put in the body.
|
|
echo "function $name $wraps --description $cmd_string"\n" $body \$argv"\n"end" | source
|
|
if set -q _flag_save
|
|
funcsave $name
|
|
end
|
|
end
|