* David Kastrup (2008-02-20) writes:

> Hi, I was editing a file in docTeX mode, and I used the menu
> LaTeX/Customize AUCTeX/Extend this menu.  As a result, a new top level
> menu "docTeX" appeared which had a fullblown customize menu as its only
> submenu.  The original LaTeX menu, however, was not extended.
>
> Not sure what the right action is here: when extending
> "LaTeX/Customize..." it would seem that we would want, by whatever
> inheritance mechanism, have this extension hold for any
> "xxxTeX/Customize..." menu.  Or not?

Yes.  The attached patch should fix this.  I still have to test it with
XEmacs before committing.

-- 
Ralf
Index: latex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/latex.el,v
retrieving revision 5.441
diff -u -r5.441 latex.el
--- latex.el	3 Feb 2008 14:53:33 -0000	5.441
+++ latex.el	21 Feb 2008 21:06:34 -0000
@@ -4528,7 +4528,7 @@
   LaTeX-mode-map
   "Menu used in LaTeX mode."
   (TeX-menu-with-help
-   `("LaTeX"
+   `(TeX-base-mode-name
      ("Section  (C-c C-s)" :filter LaTeX-section-menu-filter)
      ["Macro..." TeX-insert-macro
       :help "Insert a macro and possibly arguments"]
Index: tex-info.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex-info.el,v
retrieving revision 5.157
diff -u -r5.157 tex-info.el
--- tex-info.el	3 Feb 2008 14:53:32 -0000	5.157
+++ tex-info.el	21 Feb 2008 21:06:35 -0000
@@ -240,7 +240,7 @@
   Texinfo-mode-map
   "Menu used in Texinfo mode."
   (TeX-menu-with-help
-   `("Texinfo"
+   `(TeX-base-mode-name
      ["Node ..." [EMAIL PROTECTED]
       :help "Insert a node"]
      ["Macro ..." TeX-insert-macro
Index: tex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex.el,v
retrieving revision 5.615
diff -u -r5.615 tex.el
--- tex.el	9 Feb 2008 18:51:33 -0000	5.615
+++ tex.el	21 Feb 2008 21:06:43 -0000
@@ -3796,7 +3796,7 @@
       ["Extend this Menu"
        (progn
 	 (easy-menu-add-item
-	  nil (list TeX-base-mode-name)
+	  nil (list 'TeX-base-mode-name)
 	  (or TeX-customization-menu
 	      (setq TeX-customization-menu
 		    (customize-menu-create 'AUCTeX "Customize AUCTeX")))))
@@ -3844,7 +3844,7 @@
 (easy-menu-define plain-TeX-mode-menu
     plain-TeX-mode-map
     "Menu used in plain TeX mode."
-    (cons "TeX" plain-TeX-menu-entries))
+    (cons 'TeX-base-mode-name plain-TeX-menu-entries))
 
 ;;; AmSTeX
 
@@ -3863,7 +3863,7 @@
 (easy-menu-define AmSTeX-mode-menu
   AmSTeX-mode-map
   "Menu used in AMS-TeX mode."
-  (cons "AmS-TeX" plain-TeX-menu-entries))
+  (cons 'TeX-base-mode-name plain-TeX-menu-entries))
 
 ;;;###autoload
 (defun ams-tex-mode ()
_______________________________________________
bug-auctex mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/bug-auctex

Reply via email to