emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] 217/299: Use default parameter of completing-read.


From: Stefan Monnier
Subject: [elpa] 217/299: Use default parameter of completing-read.
Date: Sun, 02 Nov 2014 03:11:33 +0000

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit 5f31fced0fe7f83797860a08e69be711ae7f6799
Author: Tassilo Horn <address@hidden>
Date:   Wed Jan 29 20:50:10 2014 +0100

    Use default parameter of completing-read.
    
    * latex.el (LaTeX-environment): Use default parameter of
    `completing-read'.
---
 ChangeLog |    5 +++++
 latex.el  |    8 ++------
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 74813db..7de663b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2014-01-29  Tassilo Horn  <address@hidden>
+
+       * latex.el (LaTeX-environment): Use default parameter of
+       `completing-read'.
+
 2014-01-22  Tassilo Horn  <address@hidden>
 
        * style/shortvrb.el (LaTeX-shortvrb-chars): Move from
diff --git a/latex.el b/latex.el
index 974ea42..e6ce62c 100644
--- a/latex.el
+++ b/latex.el
@@ -541,12 +541,8 @@ It may be customized with the following variables:
     (environment (completing-read (concat "Environment type: (default "
                                          default ") ")
                                  (LaTeX-environment-list-filtered) nil nil nil
-                                 'LaTeX-environment-history)))
-    ;; Get default
-    (cond ((zerop (length environment))
-          (setq environment default))
-         (t
-          (setq LaTeX-default-environment environment)))
+                                 'LaTeX-environment-history default)))
+    (setq LaTeX-default-environment environment)
 
     (let ((entry (assoc environment (LaTeX-environment-list))))
       (if (null entry)



reply via email to

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