bug#4429: purecopy calls needed for :help and in menu-bar.el

[Juri Linkov]

Does anyone know a reason why one menu item in menu-bar.el
(`separator-exit') doesn't use the standard format with `menu-item'
like all other menu items use?

With the following change it seems to work right, including
"F10 f" on non-toolkit builds and -nw.

Index: lisp/menu-bar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/menu-bar.el,v
retrieving revision 1.361
diff -u -r1.361 menu-bar.el
--- lisp/menu-bar.el    12 Oct 2009 00:52:26 -0000      1.361
+++ lisp/menu-bar.el    14 Oct 2009 20:31:41 -0000
@@ -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.

-- 
Juri Linkov
http://www.jurta.org/emacs/