mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-10 08:10:21 -08:00
Code Issues Projects Releases Wiki Activity

Subsume string-try-completion' into string-common-prefix'

Browse source
This commit is contained in:
Phil Sainty 2025-06-28 22:06:16 +12:00
parent 7123c9497e
commit 1e1eef5fb0
5 changed files with 75 additions and 59 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lisp/emacs-lisp/shortdoc.el
View file

@ -386,13 +386,15 @@ A FUNC form can have any number of `:no-eval' (or `:no-value'),
(substring-no-properties
:eval (substring-no-properties (propertize "foobar" 'face 'bold) 0 3))
(string-common-prefix
:eval (string-common-prefix '("foobar" "foozot")))
(string-try-completion
:eval (string-try-completion "foo" '("foobar" "foozot" "gazonk"))
:eval (string-try-completion "foo" '("foo"))
:eval (string-try-completion "foo" nil))
:eval (string-common-prefix '("foobar" "foozot"))
:eval (string-common-prefix '("foobar" "foozot" "gazonk"))
:eval (string-common-prefix '("foobar" "foozot" "gazonk") "f")
:eval (string-common-prefix '("foobar" "foozot" "gazonk") "f" nil '("z"))
:eval (string-common-prefix '("foo") "foo")
:eval (string-common-prefix nil))
(try-completion
:eval (try-completion "foo" '("foobar" "foozot" "gazonk"))
:eval (try-completion "f" '("foobar" "foozot" "gazonk"))
:eval (try-completion "f" '("foo"))
:eval (try-completion "foo" '("foo"))
:eval (try-completion "foo" nil))
"Unicode Strings"