Mercurial > emacs
comparison src/fileio.c @ 74097:fcd1f8fd7afe
(Fread_file_name_internal): Use SBYTES (not SCHARS) to
check the tailing slash of a filename.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 20 Nov 2006 12:14:46 +0000 |
parents | dc615ff0529f |
children | cb533833bfb7 |
comparison
equal
deleted
inserted
replaced
74096:744c4854909d | 74097:fcd1f8fd7afe |
---|---|
6200 for (comp = Qnil; CONSP (all); all = XCDR (all)) | 6200 for (comp = Qnil; CONSP (all); all = XCDR (all)) |
6201 { | 6201 { |
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 } |
6209 } | 6209 } |
6210 else | 6210 else |