X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/c8d3a25c0981020e1b8aa3bf96a4a0059be82431..d703a4dce564ede122f5c307889e4bd0e3f3e75c:/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);