X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/295fb2ac59b66c0e2470325a42c8e58c135ed044..c530e1c2a3a036d71942c354ba11b30a06341fd7:/src/minibuf.c

diff --git a/src/minibuf.c b/src/minibuf.c
index a19a650d00..67b4e82456 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -1092,7 +1092,7 @@ function, instead of the usual behavior.  */)
   (Lisp_Object prompt, Lisp_Object def, Lisp_Object require_match)
 {
   Lisp_Object args[4], result;
-  unsigned char *s;
+  char *s;
   int len;
   int count = SPECPDL_INDEX ();
 
@@ -1114,7 +1114,7 @@ function, instead of the usual behavior.  */)
 
 	  if (STRINGP (prompt))
 	    {
-	      s = SDATA (prompt);
+	      s = SSDATA (prompt);
 	      len = strlen (s);
 	      if (len >= 2 && s[len - 2] == ':' && s[len - 1] == ' ')
 		len = len - 2;