auctex-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[AUCTeX-diffs] GNU AUCTeX branch, master, updated. 3536b0645aebbac75f713


From: Mosè Giordano
Subject: [AUCTeX-diffs] GNU AUCTeX branch, master, updated. 3536b0645aebbac75f713cf7e2c9d052aaa4183f
Date: Thu, 24 Sep 2015 12:47:15 +0000

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  3536b0645aebbac75f713cf7e2c9d052aaa4183f (commit)
      from  9cfd5d895aad0fa2399f5fcca7f3a08c0a153f20 (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 3536b0645aebbac75f713cf7e2c9d052aaa4183f
Author: Mosè Giordano <address@hidden>
Date:   Thu Sep 24 14:45:08 2015 +0200

    Use default argument of completing-read.
    
    * tex.el (TeX-doc): Use default argument of `completing-read'.

diff --git a/ChangeLog b/ChangeLog
index 94040d4..a585737 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2015-09-24  Mosè Giordano  <address@hidden>
+
+       * tex.el (TeX-doc): Use default argument of `completing-read'.
+
 2015-09-22  Tassilo Horn  <address@hidden>
 
        * latex.el (LaTeX-find-matching-end): Find correct end when point
diff --git a/tex.el b/tex.el
index 1c9b95b..e7c54be 100644
--- a/tex.el
+++ b/tex.el
@@ -6120,13 +6120,12 @@ NAME may be a package, a command, or a document."
          (dolist (elt docs)
            (setq completions (nconc (mapcar 'list (car elt)) completions)))
          ;; Query user.
-         (setq doc (completing-read
-                    (if contained
-                        (format "Package, command, or document (default %s): "
-                                symbol)
-                      "Package, command, or document: ")
-                    completions))
-         (setq name (if (string= doc "") symbol doc))))
+         (setq name (completing-read
+                     (if contained
+                         (format "Package, command, or document (default %s): "
+                                 symbol)
+                       "Package, command, or document: ")
+                     completions nil nil nil nil symbol))))
       (if (not name)
          (message "No documentation specified")
        ;; XXX: Provide way to choose in case a symbol can be found in

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

Summary of changes:
 ChangeLog |    4 ++++
 tex.el    |   13 ++++++-------
 2 files changed, 10 insertions(+), 7 deletions(-)


hooks/post-receive
-- 
GNU AUCTeX



reply via email to

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