From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 12 Oct 2001 03:22:02 +0000 (+0000)
Subject: (syms_of_lread): Fix init of default_suffixes.
X-Git-Tag: ttn-vms-21-2-B4~19545
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ddb716ef9746917e842ea6d5a969a206aeddd2bb;p=emacs.git

(syms_of_lread): Fix init of default_suffixes.
---

diff --git a/src/lread.c b/src/lread.c
index 0daf1764cf6..ac4e5bb333e 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -3548,7 +3548,8 @@ otherwise to default specified by file `epaths.h' when Emacs was built.");
 This list should not include the empty string.");
   Vload_suffixes = Fcons (build_string (".elc"),
 			  Fcons (build_string (".el"), Qnil));
-  default_suffixes = Fcons (empty_string, Qnil);
+  /* We don't use empty_string because it's not initialized yet.  */
+  default_suffixes = Fcons (build_string (""), Qnil);
   staticpro (&default_suffixes);
 
   DEFVAR_BOOL ("load-in-progress", &load_in_progress,