diff options
| author | Kenichi Handa | 2006-11-20 12:14:46 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2006-11-20 12:14:46 +0000 |
| commit | 3e892ae3546b93850510ebd2d03eeb4495f6c88b (patch) | |
| tree | bb55b1592264a5091a26ac0f06192307a84bfece /src | |
| parent | 565f08cda0a87186e4b9afdf3395f1fe81c7a9f1 (diff) | |
| download | emacs-3e892ae3546b93850510ebd2d03eeb4495f6c88b.tar.gz emacs-3e892ae3546b93850510ebd2d03eeb4495f6c88b.zip | |
(Fread_file_name_internal): Use SBYTES (not SCHARS) to
check the tailing slash of a filename.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fileio.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fileio.c b/src/fileio.c index fa7a2d0cd85..37afd37ad46 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -6202,7 +6202,7 @@ DEFUN ("read-file-name-internal", Fread_file_name_internal, Sread_file_name_inte | |||
| 6202 | Lisp_Object tem = XCAR (all); | 6202 | Lisp_Object tem = XCAR (all); |
| 6203 | int len; | 6203 | int len; |
| 6204 | if (STRINGP (tem) && | 6204 | if (STRINGP (tem) && |
| 6205 | (len = SCHARS (tem), len > 0) && | 6205 | (len = SBYTES (tem), len > 0) && |
| 6206 | IS_DIRECTORY_SEP (SREF (tem, len-1))) | 6206 | IS_DIRECTORY_SEP (SREF (tem, len-1))) |
| 6207 | comp = Fcons (tem, comp); | 6207 | comp = Fcons (tem, comp); |
| 6208 | } | 6208 | } |