Mercurial > emacs
changeset 23569:b1255c3676c7
fileio.c (init_fileio_once): New function.
| author | Geoff Voelker <voelker@cs.washington.edu> |
|---|---|
| date | Fri, 30 Oct 1998 03:49:09 +0000 |
| parents | dba43a039f3c |
| children | e782dce34a19 |
| files | src/fileio.c |
| diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Fri Oct 30 03:48:54 1998 +0000 +++ b/src/fileio.c Fri Oct 30 03:49:09 1998 +0000 @@ -5518,6 +5518,13 @@ } void +init_fileio_once () +{ + /* Must be set before any path manipulation is performed. */ + XSETFASTINT (Vdirectory_sep_char, '/'); +} + +void syms_of_fileio () { Qexpand_file_name = intern ("expand-file-name"); @@ -5661,7 +5668,6 @@ This variable affects the built-in functions only on Windows,\n\ on other platforms, it is initialized so that Lisp code can find out\n\ what the normal separator is."); - XSETFASTINT (Vdirectory_sep_char, '/'); DEFVAR_LISP ("file-name-handler-alist", &Vfile_name_handler_alist, "*Alist of elements (REGEXP . HANDLER) for file names handled specially.\n\