Mercurial > emacs
changeset 5251:480731ff8e9a
(Fcall_process): Call prepare_menu_bars.
(Fgetenv): One arg is maximum.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 23 Dec 1993 02:00:09 +0000 |
parents | 63a865489a1e |
children | 3c213dd261d8 |
files | src/callproc.c |
diffstat | 1 files changed, 8 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/callproc.c Thu Dec 23 01:58:56 1993 +0000 +++ b/src/callproc.c Thu Dec 23 02:00:09 1993 +0000 @@ -313,6 +313,7 @@ { register int nread; + int first = 1; while ((nread = read (fd[0], buf, sizeof buf)) > 0) { @@ -320,7 +321,12 @@ if (!NILP (buffer)) insert (buf, nread); if (!NILP (display) && INTERACTIVE) - redisplay_preserve_echo_area (); + { + if (first) + prepare_menu_bars (); + first = 0; + redisplay_preserve_echo_area (); + } immediate_quit = 1; QUIT; } @@ -603,7 +609,7 @@ return 0; } -DEFUN ("getenv", Fgetenv, Sgetenv, 1, 2, 0, +DEFUN ("getenv", Fgetenv, Sgetenv, 1, 1, 0, "Return the value of environment variable VAR, as a string.\n\ VAR should be a string. Value is nil if VAR is undefined in the environment.\n\ This function consults the variable ``process-environment'' for its value.")