X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Ffileio.c;h=015cd00444180a7eddd3fb4654b9793de7524264;hp=514c05880818869701f05ecf5957b751ffa817fa;hb=ea21eb75bbf90355514d65686bd53bea579f8e23;hpb=b73e352f264e9da0a00159dc29f318305cbe8636

diff --git a/src/fileio.c b/src/fileio.c
index 514c058..015cd00 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -4333,5 +4333,9 @@ This variable affects the built-in functions only on Windows,
 on other platforms, it is initialized so that Lisp code can find out
 what the normal separator is.
 */ );
-  Vdirectory_sep_char = make_char ('/');
+#ifdef WINDOWSNT
+  Vdirectory_sep_char = make_char ('\\');
+#else
+   Vdirectory_sep_char = make_char ('/');
+#endif
 }