aboutsummaryrefslogtreecommitdiffstats
path: root/src/lread.c
diff options
context:
space:
mode:
authorMiles Bader2007-06-11 01:00:07 +0000
committerMiles Bader2007-06-11 01:00:07 +0000
commit67f3ad67ee317226cb5d1bb139de0cfd883fdc5e (patch)
tree58a0e1bea7a1d8728fd32e6127a44434e7eac006 /src/lread.c
parentd17cf4eb2024cf54e4a216312184665094ee3df4 (diff)
parent2d715b39ea1c89066f469405d065dd1a6631d28e (diff)
downloademacs-67f3ad67ee317226cb5d1bb139de0cfd883fdc5e.tar.gz
emacs-67f3ad67ee317226cb5d1bb139de0cfd883fdc5e.zip
Merge from emacs--devo--0
Patches applied: * emacs--devo--0 (patch 781-792) - Update from CVS - Merge from gnus--rel--5.10 - Merge from emacs--rel--22 * emacs--rel--22 (patch 33-41) * gnus--rel--5.10 (patch 226-228) - Update from CVS Revision: emacs@sv.gnu.org/emacs--multi-tty--0--patch-21
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c
index 49a56a0e935..5f4d69a3312 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1201,7 +1201,7 @@ openp (path, str, suffixes, storeptr, predicate)
1201 fn = (char *) alloca (fn_size = 100 + want_size); 1201 fn = (char *) alloca (fn_size = 100 + want_size);
1202 1202
1203 /* Loop over suffixes. */ 1203 /* Loop over suffixes. */
1204 for (tail = NILP (suffixes) ? Fcons (build_string (""), Qnil) : suffixes; 1204 for (tail = NILP (suffixes) ? Fcons (empty_unibyte_string, Qnil) : suffixes;
1205 CONSP (tail); tail = XCDR (tail)) 1205 CONSP (tail); tail = XCDR (tail))
1206 { 1206 {
1207 int lsuffix = SBYTES (XCAR (tail)); 1207 int lsuffix = SBYTES (XCAR (tail));
@@ -4072,8 +4072,7 @@ and, if so, which suffixes they should try to append to the file name
4072in order to do so. However, if you want to customize which suffixes 4072in order to do so. However, if you want to customize which suffixes
4073the loading functions recognize as compression suffixes, you should 4073the loading functions recognize as compression suffixes, you should
4074customize `jka-compr-load-suffixes' rather than the present variable. */); 4074customize `jka-compr-load-suffixes' rather than the present variable. */);
4075 /* We don't use empty_string because it's not initialized yet. */ 4075 Vload_file_rep_suffixes = Fcons (empty_unibyte_string, Qnil);
4076 Vload_file_rep_suffixes = Fcons (build_string (""), Qnil);
4077 4076
4078 DEFVAR_BOOL ("load-in-progress", &load_in_progress, 4077 DEFVAR_BOOL ("load-in-progress", &load_in_progress,
4079 doc: /* Non-nil iff inside of `load'. */); 4078 doc: /* Non-nil iff inside of `load'. */);