X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/7e570fbf3ef8ccd31df2651f5d2775c5697d5950..d20f82e6f1ab902469723ebd530ca21bea9cc41b:/src/unexsol.c diff --git a/src/unexsol.c b/src/unexsol.c index 336f3b4fae..cfd515ff50 100644 --- a/src/unexsol.c +++ b/src/unexsol.c @@ -4,7 +4,6 @@ #include "unexec.h" #include -#include #include "lisp.h" #include "character.h" @@ -21,7 +20,7 @@ unexec (const char *new_name, const char *old_name) if (! dldump (0, new_name, RTLD_MEMORY)) return; - data = Fcons (build_string (new_name), Qnil); + data = list1 (build_string (new_name)); synchronize_system_messages_locale (); errstring = code_convert_string_norecord (build_string (dlerror ()), Vlocale_coding_system, 0);