# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 895004127 0
# Node ID bc29c7cef66a20c5bc2b2e8094bdd846feaa5ad5
# Parent  cb95bfcd442a1bb2b93bbbc8a4a8d7aee3d29fe7
(Fall_completions, Ftry_completion): Compare char sizes, not STRING_BYTES.

diff -r cb95bfcd442a -r bc29c7cef66a src/minibuf.c
--- a/src/minibuf.c	Tue May 12 19:44:17 1998 +0000
+++ b/src/minibuf.c	Tue May 12 20:15:27 1998 +0000
@@ -968,7 +968,7 @@
       /* Is this element a possible completion? */
 
       if (STRINGP (eltstring)
-	  && STRING_BYTES (XSTRING (string)) <= STRING_BYTES (XSTRING (eltstring))
+	  && XSTRING (string)->size <= XSTRING (eltstring)->size
 	  && (tem = Fcompare_strings (eltstring, make_number (0),
 				      make_number (XSTRING (string)->size),
 				      string, make_number (0), Qnil,
@@ -1216,7 +1216,7 @@
       /* Is this element a possible completion? */
 
       if (STRINGP (eltstring)
-	  && STRING_BYTES (XSTRING (string)) <= STRING_BYTES (XSTRING (eltstring))
+	  && XSTRING (string)->size <= XSTRING (eltstring)->size
 	  /* If HIDE_SPACES, reject alternatives that start with space
 	     unless the input starts with space.  */
 	  && ((STRING_BYTES (XSTRING (string)) > 0