summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-12-23 02:00:55 +0000
committerRichard M. Stallman <rms@gnu.org>1993-12-23 02:00:55 +0000
commit15dfb93f9b53a63f374a7254889af4a7f895ec3a (patch)
tree41c0389580e3ad060c5cc6ef441ba0986cca5960
parent306014ce0bd20ed90ae818fc9b94555c8bda14ab (diff)
downloademacs-15dfb93f9b53a63f374a7254889af4a7f895ec3a.tar.gz
(Fcall_process): Call prepare_menu_bars.
-rw-r--r--src/vmsproc.c10
1 files changed, 7 insertions, 3 deletions
diff --git a/src/vmsproc.c b/src/vmsproc.c
index fff0aec6d60..777ae61876e 100644
--- a/src/vmsproc.c
+++ b/src/vmsproc.c
@@ -573,6 +573,9 @@ if you quit, the process is killed.")
return Qnil;
}
+ if (!NILP (display) && INTERACTIVE)
+ prepare_menu_bars ();
+
record_unwind_protect (call_process_cleanup,
Fcons (make_number (fd[0]), make_number (pid)));
@@ -604,9 +607,10 @@ if you quit, the process is killed.")
else
break;
}
- sys$dassgn (inchannel);
- sys$dassgn (outchannel);
- give_back_vms_process_stuff (vs);
+
+ sys$dassgn (inchannel);
+ sys$dassgn (outchannel);
+ give_back_vms_process_stuff (vs);
/* Wait for it to terminate, unless it already has. */
wait_for_termination (pid);