From: Juanma Barranquero Date: Fri, 8 Jun 2007 19:57:46 +0000 (+0000) Subject: (syms_of_lread, openp): Use empty_unibyte_string, not build_string. X-Git-Tag: emacs-pretest-23.0.90~12398 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a74d1c97ee9c08955735db3652ba485352c48379;p=emacs.git (syms_of_lread, openp): Use empty_unibyte_string, not build_string. --- 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) 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'. */);