From d20b8af682d2e0413239d47ba2ecb30a41dec771 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 24 Apr 1995 05:51:40 +0000 Subject: [PATCH] (child_setup): Reword "can't exec" message. Add newline after message. (Fcall_process): Call Fexpand_file_name for error_file. --- src/callproc.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/callproc.c b/src/callproc.c index 325620234c8..b308644e7a3 100644 --- a/src/callproc.c +++ b/src/callproc.c @@ -242,7 +242,8 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.") if (CONSP (buffer)) { if (CONSP (XCONS (buffer)->cdr)) - error_file = XCONS (XCONS (buffer)->cdr)->car; + error_file = Fexpand_file_name (XCONS (XCONS (buffer)->cdr)->car, + Qnil); buffer = XCONS (buffer)->car; } @@ -820,8 +821,9 @@ child_setup (in, out, err, new_argv, set_pgrp, current_dir) environ = env; execvp (new_argv[0], new_argv); - write (1, "Couldn't exec the program ", 26); + write (1, "Can't exec program: ", 26); write (1, new_argv[0], strlen (new_argv[0])); + write (1, "\n", 1); _exit (1); #endif /* not WINDOWSNT */ #endif /* not MSDOS */ -- 2.39.5