diff options
author | Juanma Barranquero <[email protected]> | 2007-06-08 19:57:46 +0000 |
---|---|---|
committer | Juanma Barranquero <[email protected]> | 2007-06-08 19:57:46 +0000 |
commit | a74d1c97ee9c08955735db3652ba485352c48379 (patch) | |
tree | 9e1f60ca30837353c5e957457bf2129a55f520d8 /src/lread.c | |
parent | 2c668b9a664b677f97e12b2725b88eceb30d94d9 (diff) |
(syms_of_lread, openp): Use empty_unibyte_string, not build_string.
Diffstat (limited to 'src/lread.c')
-rw-r--r-- | src/lread.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c index 088f729075..943a55f31f 100644 --- a/src/lread.c +++ b/src/lread.c @@ -1199,7 +1199,7 @@ openp (path, str, suffixes, storeptr, predicate) fn = (char *) alloca (fn_size = 100 + want_size); /* Loop over suffixes. */ - for (tail = NILP (suffixes) ? Fcons (build_string (""), Qnil) : suffixes; + for (tail = NILP (suffixes) ? Fcons (empty_unibyte_string, Qnil) : suffixes; CONSP (tail); tail = XCDR (tail)) { int lsuffix = SBYTES (XCAR (tail)); @@ -4070,8 +4070,7 @@ and, if so, which suffixes they should try to append to the file name in order to do so. However, if you want to customize which suffixes the loading functions recognize as compression suffixes, you should customize `jka-compr-load-suffixes' rather than the present variable. */); - /* We don't use empty_string because it's not initialized yet. */ - Vload_file_rep_suffixes = Fcons (build_string (""), Qnil); + Vload_file_rep_suffixes = Fcons (empty_unibyte_string, Qnil); DEFVAR_BOOL ("load-in-progress", &load_in_progress, doc: /* Non-nil iff inside of `load'. */); |