diff options
| author | Geoff Voelker <voelker@cs.washington.edu> | 1998-10-30 03:49:09 +0000 |
|---|---|---|
| committer | Geoff Voelker <voelker@cs.washington.edu> | 1998-10-30 03:49:09 +0000 |
| commit | dbda5089c071c7f7a4e40510f66493fb72376790 (patch) | |
| tree | a4ac0f2c16058153b35575af466c40194c51ebef | |
| parent | 680256a8be35d8240d4a1b7936e53f5956623de3 (diff) | |
| download | emacs-dbda5089c071c7f7a4e40510f66493fb72376790.tar.gz | |
fileio.c (init_fileio_once): New function.
| -rw-r--r-- | src/fileio.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/fileio.c b/src/fileio.c index 79984d9baaf..79b535adc80 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -5518,6 +5518,13 @@ DIR defaults to current buffer's directory default.") } 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 @@ The value should be either ?/ or ?\\ (any other value is treated as ?\\).\n\ 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\ |