From 15dfb93f9b53a63f374a7254889af4a7f895ec3a Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Thu, 23 Dec 1993 02:00:55 +0000
Subject: (Fcall_process): Call prepare_menu_bars.

---
 src/vmsproc.c | 10 +++++++---
 1 file 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);
-- 
cgit v1.2.1