comparison src/fileio.c @ 19464:1a9f6be64530

(syms_of_fileio): Fix previous change.
author Kenichi Handa <handa@m17n.org>
date Fri, 22 Aug 1997 03:47:42 +0000
parents 950a178e8783
children b6517e9b8e60
comparison
equal deleted inserted replaced
19463:33c5695c6c7e 19464:1a9f6be64530
5153 for its argument."); 5153 for its argument.");
5154 Vfile_name_handler_alist = Qnil; 5154 Vfile_name_handler_alist = Qnil;
5155 5155
5156 DEFVAR_LISP ("auto-file-coding-system-function", 5156 DEFVAR_LISP ("auto-file-coding-system-function",
5157 &Vauto_file_coding_system_function, 5157 &Vauto_file_coding_system_function,
5158 "If non-nil, a function to call to decide a coding system of file. 5158 "If non-nil, a function to call to decide a coding system of file.\n\
5159 One argument is passed to this function: the string of the first 5159 One argument is passed to this function: the string of the first\n\
5160 few lines of a file to be read. 5160 few lines of a file to be read.\n\
5161 This function should return a coding system to decode the file contents 5161 This function should return a coding system to decode the file contents\n\
5162 specified in the heading lines with the format: 5162 specified in the heading lines with the format:\n\
5163 -*- ... coding: CODING-SYSTEM; ... -*-"); 5163 -*- ... coding: CODING-SYSTEM; ... -*-");
5164 Vauto_file_coding_system_function = Qnil; 5164 Vauto_file_coding_system_function = Qnil;
5165 5165
5166 DEFVAR_LISP ("after-insert-file-functions", &Vafter_insert_file_functions, 5166 DEFVAR_LISP ("after-insert-file-functions", &Vafter_insert_file_functions,
5167 "A list of functions to be called at the end of `insert-file-contents'.\n\ 5167 "A list of functions to be called at the end of `insert-file-contents'.\n\