# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1027560627 0
# Node ID 1b6e73e289bc211642d4067ddfdfa1123a766382
# Parent  3c4bb9fc6a5f4f976caad7d1d405abf36df6a96c
(Fload): Don't load with Qload_force_doc_strings t if
version is 0.

diff -r 3c4bb9fc6a5f -r 1b6e73e289bc src/lread.c
--- a/src/lread.c	Thu Jul 25 01:29:57 2002 +0000
+++ b/src/lread.c	Thu Jul 25 01:30:27 2002 +0000
@@ -1029,7 +1029,7 @@
   load_descriptor_list
     = Fcons (make_number (fileno (stream)), load_descriptor_list);
   load_in_progress++;
-  if (version >= 22)
+  if (! version || version >= 22)
     readevalloop (Qget_file_char, stream, file, Feval, 0, Qnil, Qnil);
   else
     {