changeset 5377:7a8463c07d8f

(Fsubstitute_command_keys): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Fri, 31 Dec 1993 03:05:39 +0000
parents eb9c60c0cfe8
children 32a291ab0c5f
files src/doc.c
diffstat 1 files changed, 6 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/doc.c	Thu Dec 30 16:43:05 1993 +0000
+++ b/src/doc.c	Fri Dec 31 03:05:39 1993 +0000
@@ -430,9 +430,12 @@
 	  /* Disregard menu bar bindings; it is positively annoying to
 	     mention them when there's no menu bar, and it isn't terribly
 	     useful even when there is a menu bar.  */
-	  firstkey = Faref (tem, make_number (0));
-	  if (EQ (firstkey, Qmenu_bar))
-	    tem = Qnil;
+	  if (!NILP (tem))
+	    {
+	      firstkey = Faref (tem, make_number (0));
+	      if (EQ (firstkey, Qmenu_bar))
+		tem = Qnil;
+	    }
 
 	  if (NILP (tem))	/* but not on any keys */
 	    {