diff options
author | Kenichi Handa <handa@m17n.org> | 1998-03-03 07:18:46 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1998-03-03 07:18:46 +0000 |
commit | bd33479f0a26736420e12d2b74b644f776765d40 (patch) | |
tree | d7930d7df6cd25ad1d844c74eca9db721ab66dcd /src/dired.c | |
parent | 14dc6093870e0d04dca24a84d5c337b506981e08 (diff) | |
download | emacs-bd33479f0a26736420e12d2b74b644f776765d40.tar.gz |
Include charset.h and coding.h.
(ENCODE_FILE): This macro is moved to coding.h.
(Vdefault_file_name_coding_system): Extern it.
(Fdirectory_files): Use DECODE_FILE.
(file_name_completion): Likewise.
Diffstat (limited to 'src/dired.c')
-rw-r--r-- | src/dired.c | 31 |
1 files changed, 8 insertions, 23 deletions
diff --git a/src/dired.c b/src/dired.c index 8cd4f5d86ee..076b42ee40c 100644 --- a/src/dired.c +++ b/src/dired.c @@ -78,7 +78,8 @@ extern struct direct *readdir (); #include "lisp.h" #include "buffer.h" #include "commands.h" - +#include "charset.h" +#include "coding.h" #include "regex.h" /* Returns a search buffer, with a fastmap allocated and ready to go. */ @@ -86,14 +87,6 @@ extern struct re_pattern_buffer *compile_pattern (); #define min(a, b) ((a) < (b) ? (a) : (b)) -/* Encode the file name NAME using the specified coding system - for file names, if any. */ -#define ENCODE_FILE(name) \ - (! NILP (Vfile_name_coding_system) \ - && XFASTINT (Vfile_name_coding_system) != 0 \ - ? Fencode_coding_string (name, Vfile_name_coding_system, Qt) \ - : name) - /* if system does not have symbolic links, it does not have lstat. In that case, use ordinary stat instead. */ @@ -103,7 +96,7 @@ extern struct re_pattern_buffer *compile_pattern (); extern int completion_ignore_case; extern Lisp_Object Vcompletion_regexp_list; -extern Lisp_Object Vfile_name_coding_system; +extern Lisp_Object Vfile_name_coding_system, Vdefault_file_name_coding_system; Lisp_Object Vcompletion_ignored_extensions; Lisp_Object Qcompletion_ignore_case; @@ -231,9 +224,7 @@ If NOSORT is non-nil, the list is not sorted--its order is unpredictable.\n\ } else name = make_string (dp->d_name, len); - if (! NILP (Vfile_name_coding_system)) - name = Fdecode_coding_string (name, Vfile_name_coding_system, - Qt); + name = DECODE_FILE (name); list = Fcons (name, list); } } @@ -462,9 +453,7 @@ file_name_completion (file, dirname, all_flag, ver_flag) name = make_string (dp->d_name, len); if (all_flag) { - if (! NILP (Vfile_name_coding_system)) - name = Fdecode_coding_string (name, - Vfile_name_coding_system, Qt); + name = DECODE_FILE (name); bestmatch = Fcons (name, bestmatch); } else @@ -532,10 +521,8 @@ file_name_completion (file, dirname, all_flag, ver_flag) if (all_flag || NILP (bestmatch)) { - if (! NILP (Vfile_name_coding_system) - && STRINGP (bestmatch)) - bestmatch = Fdecode_coding_string (bestmatch, - Vfile_name_coding_system, Qt); + if (STRINGP (bestmatch)) + bestmatch = DECODE_FILE (bestmatch); return bestmatch; } if (matchcount == 1 && bestmatchsize == XSTRING (file)->size) @@ -544,9 +531,7 @@ file_name_completion (file, dirname, all_flag, ver_flag) make_number (bestmatchsize)); /* Now that we got the right initial segment of BESTMATCH, decode it from the coding system in use. */ - if (! NILP (Vfile_name_coding_system)) - bestmatch = Fdecode_coding_string (bestmatch, - Vfile_name_coding_system, Qt); + bestmatch = DECODE_FILE (bestmatch); return bestmatch; quit: |