diff options
author | Mattias EngdegÄrd <mattiase@acm.org> | 2022-07-11 17:31:38 +0200 |
---|---|---|
committer | Mattias EngdegÄrd <mattiase@acm.org> | 2022-07-11 17:35:01 +0200 |
commit | 871db806e686236d76e8ddbf3b11dc4bbdc0b91e (patch) | |
tree | 08bf90d5b92351b6a25fdbfc96895871d3bb1595 /src/minibuf.c | |
parent | ac0027f6a5480bd4739fdf71413a19012f400483 (diff) | |
download | emacs-871db806e686236d76e8ddbf3b11dc4bbdc0b91e.tar.gz emacs-871db806e686236d76e8ddbf3b11dc4bbdc0b91e.tar.bz2 emacs-871db806e686236d76e8ddbf3b11dc4bbdc0b91e.zip |
Remove obsolete uses of obsolete functions
* src/minibuf.c (minibuf_conform_representation): Remove.
(Ftry_completion): Don't call it.
(Ftest_completion): Don't use the obsolete Fstring_make_unibyte or
Fstring_make_multibyte; they don't serve any useful purpose here.
We don't try to equate unibyte and multibyte raw bytes in symbol
lookups elsewhere and there is no reason to do it here.
Diffstat (limited to 'src/minibuf.c')
-rw-r--r-- | src/minibuf.c | 27 |
1 files changed, 1 insertions, 26 deletions
diff --git a/src/minibuf.c b/src/minibuf.c index 0fba334b22b..bedc5644807 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -1545,18 +1545,6 @@ function, instead of the usual behavior. */) return unbind_to (count, result); } -static Lisp_Object -minibuf_conform_representation (Lisp_Object string, Lisp_Object basis) -{ - if (STRING_MULTIBYTE (string) == STRING_MULTIBYTE (basis)) - return string; - - if (STRING_MULTIBYTE (string)) - return Fstring_make_unibyte (string); - else - return Fstring_make_multibyte (string); -} - static bool match_regexps (Lisp_Object string, Lisp_Object regexps, bool ignore_case) @@ -1817,7 +1805,7 @@ or from one of the possible completions. */) don't change the case of what the user typed. */ if (completion_ignore_case && bestmatchsize == SCHARS (string) && SCHARS (bestmatch) > bestmatchsize) - return minibuf_conform_representation (string, bestmatch); + return string; /* Return t if the supplied string is an exact match (counting case); it does not require any change to be made. */ @@ -2090,19 +2078,6 @@ the values STRING, PREDICATE and `lambda'. */) SSDATA (string), SCHARS (string), SBYTES (string)); - if (!SYMBOLP (tem)) - { - if (STRING_MULTIBYTE (string)) - string = Fstring_make_unibyte (string); - else - string = Fstring_make_multibyte (string); - - tem = oblookup (collection, - SSDATA (string), - SCHARS (string), - SBYTES (string)); - } - if (completion_ignore_case && !SYMBOLP (tem)) { for (i = ASIZE (collection) - 1; i >= 0; i--) |