[Top][All Lists]

[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 <address@hidden> 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)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]