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

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

[elpa] externals/auctex ab161ba 09/17: ; Convert tabs to spaces


From: Tassilo Horn
Subject: [elpa] externals/auctex ab161ba 09/17: ; Convert tabs to spaces
Date: Fri, 2 Apr 2021 04:13:19 -0400 (EDT)

branch: externals/auctex
commit ab161bae79298018f7ac982eb60d48d2bae667de
Author: Ikumi Keita <ikumi@ikumi.que.jp>
Commit: Ikumi Keita <ikumi@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)))



reply via email to

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