aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/lread.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c
index 088f729075d..943a55f31f8 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1199,7 +1199,7 @@ openp (path, str, suffixes, storeptr, predicate)
1199 fn = (char *) alloca (fn_size = 100 + want_size); 1199 fn = (char *) alloca (fn_size = 100 + want_size);
1200 1200
1201 /* Loop over suffixes. */ 1201 /* Loop over suffixes. */
1202 for (tail = NILP (suffixes) ? Fcons (build_string (""), Qnil) : suffixes; 1202 for (tail = NILP (suffixes) ? Fcons (empty_unibyte_string, Qnil) : suffixes;
1203 CONSP (tail); tail = XCDR (tail)) 1203 CONSP (tail); tail = XCDR (tail))
1204 { 1204 {
1205 int lsuffix = SBYTES (XCAR (tail)); 1205 int lsuffix = SBYTES (XCAR (tail));
@@ -4070,8 +4070,7 @@ and, if so, which suffixes they should try to append to the file name
4070in order to do so. However, if you want to customize which suffixes 4070in order to do so. However, if you want to customize which suffixes
4071the loading functions recognize as compression suffixes, you should 4071the loading functions recognize as compression suffixes, you should
4072customize `jka-compr-load-suffixes' rather than the present variable. */); 4072customize `jka-compr-load-suffixes' rather than the present variable. */);
4073 /* We don't use empty_string because it's not initialized yet. */ 4073 Vload_file_rep_suffixes = Fcons (empty_unibyte_string, Qnil);
4074 Vload_file_rep_suffixes = Fcons (build_string (""), Qnil);
4075 4074
4076 DEFVAR_BOOL ("load-in-progress", &load_in_progress, 4075 DEFVAR_BOOL ("load-in-progress", &load_in_progress,
4077 doc: /* Non-nil iff inside of `load'. */); 4076 doc: /* Non-nil iff inside of `load'. */);