From: Geoff Voelker <voelker@cs.washington.edu>
Date: Fri, 30 Oct 1998 03:49:09 +0000 (+0000)
Subject: fileio.c (init_fileio_once): New function.
X-Git-Tag: emacs-20.4~1380
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dbda5089c071c7f7a4e40510f66493fb72376790;p=emacs.git

fileio.c (init_fileio_once): New function.
---

diff --git a/src/fileio.c b/src/fileio.c
index 79984d9baaf..79b535adc80 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -5517,6 +5517,13 @@ DIR defaults to current buffer's directory default.")
   return val;
 }
 
+void
+init_fileio_once ()
+{
+  /* Must be set before any path manipulation is performed.  */
+  XSETFASTINT (Vdirectory_sep_char, '/');
+}
+
 void
 syms_of_fileio ()
 {
@@ -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\