From 03fb33cf7576802a484ce9c1bd339c66fa865606 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Thu, 15 Oct 2009 22:23:11 +0000 Subject: [PATCH] (menu-bar-file-menu): Convert `separator-exit' to the `menu-item' format. --- lisp/ChangeLog | 5 +++++ lisp/menu-bar.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bc7c881876a..eaec532355b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-10-15 Juri Linkov + + * menu-bar.el (menu-bar-file-menu): Convert `separator-exit' + to the `menu-item' format. + 2009-10-15 Michael Albinus * net/tramp.el (tramp-replace-environment-variables): Do not fail diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 5ba4b24f88a..0a4fb9381ae 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -68,7 +68,7 @@ :help ,(purecopy "Save unsaved buffers, then exit"))) (define-key menu-bar-file-menu [separator-exit] - (purecopy '("--"))) + `(menu-item ,(purecopy "--"))) ;; Don't use delete-frame as event name because that is a special ;; event. -- 2.11.4.GIT