From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 16 Apr 1994 03:50:38 +0000 (+0000)
Subject: (xmenu_show): Don't cons on subprefix_stck[j] if nil.
X-Git-Tag: emacs-19.34~8940
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5964e4506617613f833e333483ae099489fbc427;p=emacs.git

(xmenu_show): Don't cons on subprefix_stck[j] if nil.
---

diff --git a/src/xmenu.c b/src/xmenu.c
index 9614e752430..83f559a1fdc 100644
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -1727,7 +1727,8 @@ xmenu_show (f, x, y, menubarp, keymaps, title, error)
 		      if (!NILP (prefix))
 			entry = Fcons (prefix, entry);
 		      for (j = submenu_depth - 1; j >= 0; j--)
-			entry = Fcons (subprefix_stack[j], entry);
+			if (!NILP (subprefix_stack[j], entry))
+			  entry = Fcons (subprefix_stack[j], entry);
 		    }
 		  return entry;
 		}