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