[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/auctex 717e5f0 06/62: Simplify nested `let's
From: |
Tassilo Horn |
Subject: |
[elpa] externals/auctex 717e5f0 06/62: Simplify nested `let's |
Date: |
Sun, 20 Dec 2020 10:39:50 -0500 (EST) |
branch: externals/auctex
commit 717e5f0a9adc9945eb75191861f816fc1e8e9136
Author: Ikumi Keita <ikumi@ikumi.que.jp>
Commit: Tassilo Horn <tsdh@gnu.org>
Simplify nested `let's
* tex-buf.el (TeX-active-master-with-quotes): Simplify nested `let's
into singe one.
---
tex-buf.el | 48 ++++++++++++++++++++++++------------------------
1 file changed, 24 insertions(+), 24 deletions(-)
diff --git a/tex-buf.el b/tex-buf.el
index 9b04a07..bb5e275 100644
--- a/tex-buf.el
+++ b/tex-buf.el
@@ -585,30 +585,30 @@ infinite loop in `TeX-command-expand'.
Helper function of `TeX-command-expand'. Use only within entries in
`TeX-expand-list-builtin' and `TeX-expand-list'."
- (let ((res
- (shell-quote-argument
- (let* ((raw (TeX-active-master extension nondirectory ask))
- ;; String `TeX-command-text' means that the file name is
- ;; given through \input command.
- (quote-for-space (if (and (stringp TeX-command-text)
- (string-match " " raw))
- "\"" "")))
- (format
- (if (and extra
- (stringp TeX-command-text)
- (memq major-mode '(latex-mode doctex-mode))
- (memq TeX-engine '(default uptex)))
- ;; Since TeXLive 2018, the default encoding for LaTeX
- ;; files has been changed to UTF-8 if used with
- ;; classic TeX or pdfTeX. I.e.,
- ;; \usepackage[utf8]{inputenc} is enabled by default
- ;; in (pdf)latex.
- ;; c.f. LaTeX News issue 28
- ;; Due to this change, \detokenize is required to
- ;; recognize non-ascii characters in the file name
- ;; when \input precedes.
- "\\detokenize{ %s }" "%s")
- (concat quote-for-space raw quote-for-space))))))
+ (let* ((raw (TeX-active-master extension nondirectory ask))
+ ;; String `TeX-command-text' means that the file name is
+ ;; given through \input command.
+ (quote-for-space (if (and (stringp TeX-command-text)
+ (string-match " " raw))
+ "\"" ""))
+ (res
+ (shell-quote-argument
+ (format
+ (if (and extra
+ (stringp TeX-command-text)
+ (memq major-mode '(latex-mode doctex-mode))
+ (memq TeX-engine '(default uptex)))
+ ;; Since TeXLive 2018, the default encoding for LaTeX
+ ;; files has been changed to UTF-8 if used with
+ ;; classic TeX or pdfTeX. I.e.,
+ ;; \usepackage[utf8]{inputenc} is enabled by default
+ ;; in (pdf)latex.
+ ;; c.f. LaTeX News issue 28
+ ;; Due to this change, \detokenize is required to
+ ;; recognize non-ascii characters in the file name
+ ;; when \input precedes.
+ "\\detokenize{ %s }" "%s")
+ (concat quote-for-space raw quote-for-space)))))
;; Advance past the file name in order to
;; prevent expanding any substring of it.
(setq TeX-expand-pos
- [elpa] externals/auctex 00b2d73 12/62: Add missing argument to function body, (continued)
- [elpa] externals/auctex 00b2d73 12/62: Add missing argument to function body, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex e9af4f1 14/62: * style/fancyvrb.el: Replace dynamically bound `optional'., Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 19cdfe0 22/62: Put point after the graphic file argrument, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex f7c0c73 01/62: Enable lexical-binding for AUCTeX core files, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 8951549 04/62: ; Trivial cleanups, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 96c945a 11/62: Remove `TeX-arg-none', Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 9656d30 21/62: Fix insertion of unnecessary backslash, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex b42e932 23/62: ; * style/graphicx.el: Fix Ataka-san's name and email., Tassilo Horn, 2020/12/20
- [elpa] externals/auctex f9387c6 27/62: ; use with-no-warnings instead of with-suppressed-warnings for compat, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 384c1d2 08/62: Use declared dynamic variable in tex-jp, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 717e5f0 06/62: Simplify nested `let's,
Tassilo Horn <=
- [elpa] externals/auctex ced4b1a 10/62: Adapt styles to lexical-binding, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 42f061a 17/62: Improve style/amsthm.el, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 08d01c1 19/62: ; * style/changelog.el: Silence the compiler for `reftex-label-alist'., Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 4c1430a 20/62: Add new style/appendix.el, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 5bffc24 24/62: ; * font-latex.el (font-latex-update-math-env): Fix docstring., Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 072cfc7 28/62: ; Convert suffix to pattern rule, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex a9c37b7 29/62: ; Add new make target dynvars-check, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 3fa1baa 32/62: ; Improve dynvars check, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex f1f71c2 36/62: ; Fix byte-compiler warnings in styles, Tassilo Horn, 2020/12/20
- [elpa] externals/auctex 70dc031 38/62: ; Fix more byte-compiler warnings in styles, Tassilo Horn, 2020/12/20