[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#179: 23.0.60; Menu separators are not displayed
From: |
Chong Yidong |
Subject: |
bug#179: 23.0.60; Menu separators are not displayed |
Date: |
Tue, 05 Aug 2008 17:54:49 -0400 |
Hello David,
Did you ever get the chance to try Stefan's patch from May?
Stefan Monnier <monnier@iro.umontreal.ca> wrote:
> Does the patch below fix it?
>
> Stefan
--- subr.el.~1.594.~ 2008-05-02 12:47:05.000000000 -0400
+++ subr.el 2008-05-05 02:58:00.000000000 -0400
@@ -571,10 +571,14 @@
(let* ((key (car binding))
(item (cdr binding))
(oldbind (assq key bindings)))
+ (if (null key)
+ ;; nil keys are/were used by easy-menu for "separator lines and
+ ;; separator titles". Merging them makes no sense.
+ (push binding bindings)
;; Newer bindings override older.
(if oldbind (setq bindings (delq oldbind bindings)))
(when item ;nil bindings just hide older ones.
- (push binding bindings))))
+ (push binding bindings)))))
(nconc map bindings)))
(put 'keyboard-translate-table 'char-table-extra-slots 0)
- bug#179: 23.0.60; Menu separators are not displayed,
Chong Yidong <=