branch: externals/auctex commit ab161bae79298018f7ac982eb60d48d2bae667de Author: Ikumi Keita <ik...@ikumi.que.jp> Commit: Ikumi Keita <ik...@ikumi.que.jp>
; Convert tabs to spaces * bib-cite.el: * preview.el.in: * style/bigdelim.el: * style/hologo.el: Convert tabs to spaces --- bib-cite.el | 16 ++++++++-------- preview.el.in | 4 ++-- style/bigdelim.el | 6 +++--- style/hologo.el | 6 +++--- 4 files changed, 16 insertions(+), 16 deletions(-) diff --git a/bib-cite.el b/bib-cite.el index a996a21..99b9278 100644 --- a/bib-cite.el +++ b/bib-cite.el @@ -1429,11 +1429,11 @@ If within a multi-file document (in auctex only) (if (bib-Is-hidden) (save-excursion (beginning-of-line) - ;; COMPATIBILITY for emacs<25. - (if (fboundp 'outline-show-entry) - (outline-show-entry) + ;; COMPATIBILITY for emacs<25. + (if (fboundp 'outline-show-entry) + (outline-show-entry) (with-no-warnings - (show-entry))))))) + (show-entry))))))) (defvar bib-label-prompt-map (let ((map (make-sparse-keymap))) @@ -1760,8 +1760,8 @@ Return the-warnings as text." (let* ((the-key (car (car string-alist))) (the-string (cdr (car string-alist))) (slashed-string ; "J. of Geo.\" -> "J. of Geo.\\\\" - (replace-regexp-in-string - "\\\\" "\\\\" the-string t t))) + (replace-regexp-in-string + "\\\\" "\\\\" the-string t t))) (while (re-search-forward (concat "\\(^[, \t]*[a-zA-Z]+[ \t]*=[ \t]*\\)" @@ -2327,10 +2327,10 @@ bib-dos-or-os2-variable affects: (if (not (getenv env)) nil ;Because replace-regexp-in-string fails (let* ((value (if bib-dos-or-os2-variable - (replace-regexp-in-string "\\\\" "/" (getenv env) t t) + (replace-regexp-in-string "\\\\" "/" (getenv env) t t) (getenv env))) (sep-char (or (and bib-dos-or-os2-variable ";") ":")) - (entries (split-string value sep-char))) + (entries (split-string value sep-char))) (cl-loop for x in entries if (bib-cite-file-directory-p x) collect x)))) (provide 'bib-cite) diff --git a/preview.el.in b/preview.el.in index 1adf2b2..4006744 100644 --- a/preview.el.in +++ b/preview.el.in @@ -3351,7 +3351,7 @@ name(\\([^)]+\\))\\)\\|\ ;;; Too ugly to describe in detail. In short, we try to catch file ;;; names built from path components that don't contain spaces or ;;; other special characters once the file extension has started. -;;; +;;; ;;; Position for searching immediately after the file name so as to ;;; not miss closing parens or something. ;;; (match-string 3) is the file name. @@ -4189,7 +4189,7 @@ internal parameters, STR may be a log to insert into the current log." ;; get the correct path but then ;; strip the extension (file-name-sans-extension - (TeX-master-file "prv" t)))))) + (TeX-master-file "prv" t)))))) (process-environment (copy-sequence process-environment)) (process (progn diff --git a/style/bigdelim.el b/style/bigdelim.el index 7f0dee5..cb54da7 100644 --- a/style/bigdelim.el +++ b/style/bigdelim.el @@ -34,8 +34,8 @@ ;; Silence the compiler: (declare-function font-latex-add-keywords - "font-latex" - (keywords class)) + "font-latex" + (keywords class)) (defun TeX-arg-bigdelim-brace (optional side &optional prompt) "Prompt for a single brace, and do not insert the matching one. @@ -53,7 +53,7 @@ standard one." TeX-grop)) (TeX-arg-closing-brace (if (string= TeX-arg-opening-brace TeX-grop) TeX-grcl - ""))) + ""))) (TeX-argument-insert brace optional (when (member brace '("{" "}")) TeX-esc)))) diff --git a/style/hologo.el b/style/hologo.el index f714d6c..863b3d4 100644 --- a/style/hologo.el +++ b/style/hologo.el @@ -111,9 +111,9 @@ (member (buffer-substring (region-beginning) (region-end)) LaTeX-hologo-logo-names)) (progn - (insert TeX-grop) - (goto-char (region-end)) - (insert TeX-grcl)) + (insert TeX-grop) + (goto-char (region-end)) + (insert TeX-grcl)) (TeX-argument-insert (completing-read "Logo name: " LaTeX-hologo-logo-names) optional)))