monnier pushed a commit to branch externals/auctex
in repository elpa.
commit 5f31fced0fe7f83797860a08e69be711ae7f6799
Author: Tassilo Horn <[email protected]>
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 <[email protected]>
+
+ * latex.el (LaTeX-environment): Use default parameter of
+ `completing-read'.
+
2014-01-22 Tassilo Horn <[email protected]>
* 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)
