diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-19 23:14:57 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-19 23:14:57 -0700 |
| commit | ad39facaee4dcbd0e3f002e0a1674fce00e92c0c (patch) | |
| tree | 884b03e31a7fc0e9c74c47aee792731280155acb /src/minibuf.c | |
| parent | 6e5bb2dc82e57e8666eae89848050a78554709fa (diff) | |
| download | emacs-ad39facaee4dcbd0e3f002e0a1674fce00e92c0c.tar.gz | |
* minibuf.c (Fread_buffer): Don't assume strlen fits in int.
Diffstat (limited to 'src/minibuf.c')
| -rw-r--r-- | src/minibuf.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/minibuf.c b/src/minibuf.c index 1b555035cfe..ca2f22df9ed 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -1115,7 +1115,7 @@ function, instead of the usual behavior. */) { Lisp_Object args[4], result; char *s; - int len; + ptrdiff_t len; int count = SPECPDL_INDEX (); if (BUFFERP (def)) @@ -1137,7 +1137,7 @@ function, instead of the usual behavior. */) if (STRINGP (prompt)) { s = SSDATA (prompt); - len = strlen (s); + len = SBYTES (prompt); if (len >= 2 && s[len - 2] == ':' && s[len - 1] == ' ') len = len - 2; else if (len >= 1 && (s[len - 1] == ':' || s[len - 1] == ' ')) |