Mercurial > emacs

changeset 22542:ca46e1a32856

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(menu_item_eval_property): Bind Qinhibit_redisplay.
author Karl Heuer <kwzh@gnu.org>
date Mon, 22 Jun 1998 17:34:59 +0000
parents c0e254b26492
children 32cfe5058f27
files src/keyboard.c
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Mon Jun 22 17:33:13 1998 +0000
+++ b/src/keyboard.c	Mon Jun 22 17:34:59 1998 +0000
@@ -5624,10 +5624,12 @@
 menu_item_eval_property (sexpr)
      Lisp_Object sexpr;
 {
+  int count = specpdl_ptr - specpdl;
   Lisp_Object val;
+  specbind (Qinhibit_redisplay, Qt);
   val = internal_condition_case_1 (Feval, sexpr, Qerror,
 				   menu_item_eval_property_1);
-  return val;
+  return unbind_to (count, val);
 }
 
 /* This function parses a menu item and leaves the result in the