[AUCTeX-diffs] GNU AUCTeX branch, master, updated. 17d86b5f20988a5bf2818c590e7de06e17e07a8b

[Ikumi Keita]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".

The branch, master has been updated
       via  17d86b5f20988a5bf2818c590e7de06e17e07a8b (commit)
      from  fa24654358dea143f868a1439945ed9203963c29 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 17d86b5f20988a5bf2818c590e7de06e17e07a8b
Author: Ikumi Keita <address@hidden>
Date:   Mon Jul 31 23:01:13 2017 +0900

    Conform to elisp coding convention in context.el
    
    * context.el (ConTeXt-numbered-section-heading,
    ConTeXt-unnumbered-section-heading, ConTeXt-environment): Tailor
    prompt string.
    (ConTeXt-menu-update): Add "done" messages.

diff --git a/context.el b/context.el
index d322afc..e42423b 100644
--- a/context.el
+++ b/context.el
@@ -508,7 +508,7 @@ in your .emacs file."
 Insert this hook into `ConTeXt-numbered-section-hook' to allow the user to 
change
 the name of the sectioning command inserted with `\\[ConTeXt-section]'."
   (let ((string (completing-read
-                (concat "Select level: (default " name ") ")
+                (concat "Select level (default " name "): ")
                 ConTeXt-numbered-section-list
                 nil nil nil)))
     ;; Update name
@@ -520,7 +520,7 @@ the name of the sectioning command inserted with 
`\\[ConTeXt-section]'."
 Insert this hook into `ConTeXt-unnumbered-section-hook' to allow the user to 
change
 the name of the sectioning command inserted with `\\[ConTeXt-section]'."
   (let ((string (completing-read
-                (concat "Select level: (default " name ") ")
+                (concat "Select level (default " name "): ")
                 ConTeXt-unnumbered-section-list
                 nil nil nil)))
     ;; Update name
@@ -670,7 +670,7 @@ With optional ARG, modify current environment."
                   ((TeX-near-bobp) "text")
                   (t ConTeXt-default-environment)))
         (environment
-         (completing-read (concat "Environment type: (default " default ") ")
+         (completing-read (concat "Environment type (default " default "): ")
                           ConTeXt-environment-list nil nil nil
                           'ConTeXt-environment-history default)))
     ;; Use `environment' as default for the next time only if it is different
@@ -1545,46 +1545,55 @@ else.  There might be text before point."
        (setq ConTeXt-menu-changed nil)
        (message "Updating section menu...")
        (mapc #'ConTeXt-section-enable ConTeXt-section-list)
+       (message "Updating section menu...done")
        (message "Updating environment menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-environment-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-environment-menu-entry
                                   (ConTeXt-environment-list))))
+       (message "Updating environment menu...done")
        (message "Updating modify environment menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-environment-modify-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-environment-modify-menu-entry
                                   (ConTeXt-environment-list))))
+       (message "Updating modify environment menu...done")
        (message "Updating define menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-define-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-define-menu-entry
                                   ConTeXt-define-list)))
+       (message "Updating define menu...done")
        (message "Updating setup menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-setup-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-setup-menu-entry
                                   ConTeXt-setup-list)))
+       (message "Updating setup menu...done")
        (message "Updating referencing menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-referencing-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-referencing-menu-entry
                                   ConTeXt-referencing-list)))
+       (message "Updating referencing menu...done")
        (message "Updating other macro's menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-other-macro-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-other-macro-menu-entry
                                   ConTeXt-other-macro-list)))
+       (message "Updating other macro's menu...done")
        (message "Updating project structure menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-project-structure-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-project-structure-menu-entry
                                   ConTeXt-project-structure-list)))
+       (message "Updating project structure menu...done")
        (message "Updating section block menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-section-block-menu-name
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-section-block-menu-entry
                                   ConTeXt-section-block-list)))
+       (message "Updating section block menu...done")
        (message "Updating section menu...")
        (easy-menu-change '("ConTeXt") ConTeXt-numbered-section-menu-name
                          (LaTeX-split-long-menu
@@ -1594,7 +1603,7 @@ else.  There might be text before point."
                          (LaTeX-split-long-menu
                           (mapcar #'ConTeXt-unnumbered-section-menu-entry
                                   ConTeXt-unnumbered-section-list)))
-       (message "Updating...done")
+       (message "Updating section menu...done")
        (and menu (easy-menu-return-item ConTeXt-mode-menu menu))
        )))
 

-----------------------------------------------------------------------

Summary of changes:
 context.el | 17 +++++++++++++----
 1 file changed, 13 insertions(+), 4 deletions(-)


hooks/post-receive
-- 
GNU AUCTeX