aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1995-12-26 04:37:05 +0000
committerRichard M. Stallman1995-12-26 04:37:05 +0000
commit1f5b1641369d2bda6bd3470b1da3aea10c7b3f64 (patch)
tree1efb821d289295252b5a5728bc0341fa1a81e926 /src
parent6ef338b79955cc159b3330c0c9cbcf923d40434b (diff)
downloademacs-1f5b1641369d2bda6bd3470b1da3aea10c7b3f64.tar.gz
emacs-1f5b1641369d2bda6bd3470b1da3aea10c7b3f64.zip
(read_char_x_menu_prompt): HAVE_X_MENU renamed to HAVE_MENUS.
(Fexecute_extended_command): Nice error if empty cmd name.
Diffstat (limited to 'src')
-rw-r--r--src/keyboard.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index 08725ba3bea..f20631485ec 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4925,7 +4925,7 @@ read_char_x_menu_prompt (nmaps, maps, prev_event, used_mouse_menu)
4925 if (mapno >= nmaps) 4925 if (mapno >= nmaps)
4926 return Qnil; 4926 return Qnil;
4927 4927
4928#if (defined (HAVE_X_WINDOWS) && defined (HAVE_X_MENU)) || defined (MSDOS) || defined (HAVE_NTGUI) 4928#ifdef HAVE_MENUS
4929 /* If we got to this point via a mouse click, 4929 /* If we got to this point via a mouse click,
4930 use a real menu for mouse selection. */ 4930 use a real menu for mouse selection. */
4931 if (EVENT_HAS_PARAMETERS (prev_event) 4931 if (EVENT_HAS_PARAMETERS (prev_event)
@@ -4975,7 +4975,7 @@ read_char_x_menu_prompt (nmaps, maps, prev_event, used_mouse_menu)
4975 *used_mouse_menu = 1; 4975 *used_mouse_menu = 1;
4976 return value; 4976 return value;
4977 } 4977 }
4978#endif /* (HAVE_X_WINDOWS && HAVE_X_MENU) || MSDOS || HAVE_NTGUI */ 4978#endif /* HAVE_MENUS */
4979 return Qnil ; 4979 return Qnil ;
4980} 4980}
4981 4981
@@ -6492,6 +6492,9 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
6492 Vobarray, Qcommandp, 6492 Vobarray, Qcommandp,
6493 Qt, Qnil, Qextended_command_history); 6493 Qt, Qnil, Qextended_command_history);
6494 6494
6495 if (STRINGP (function) && XSTRING (function)->size == 0)
6496 error ("No command name given");
6497
6495 /* Set this_command_keys to the concatenation of saved_keys and 6498 /* Set this_command_keys to the concatenation of saved_keys and
6496 function, followed by a RET. */ 6499 function, followed by a RET. */
6497 { 6500 {