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

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

[nongnu] elpa/why-this f3d1e47b80 37/59: Fix indentation


From: ELPA Syncer
Subject: [nongnu] elpa/why-this f3d1e47b80 37/59: Fix indentation
Date: Sun, 27 Nov 2022 16:02:52 -0500 (EST)

branch: elpa/why-this
commit f3d1e47b80446899fa08815b605a6c17f6284f81
Author: Akib Azmain Turja <akib@disroot.org>
Commit: Akib Azmain Turja <akib@disroot.org>

    Fix indentation
---
 why-this.el | 36 ++++++++++++++++++------------------
 1 file changed, 18 insertions(+), 18 deletions(-)

diff --git a/why-this.el b/why-this.el
index aa7fbcbff2..e389670a5d 100644
--- a/why-this.el
+++ b/why-this.el
@@ -706,24 +706,24 @@ Do CMD with ARGS."
     ('line-data
      (when (> (- (nth 1 args) (nth 0 args)) 0)
        (let* ((blame (let ((temp-file
-                              (let ((file (make-temp-file "why-this-git-"))
-                                    (text (buffer-substring-no-properties
-                                           (point-min) (point-max))))
-                                (with-temp-file file
-                                  (insert text))
-                                file)))
-                         (unwind-protect
-                             (butlast
-                              (split-string
-                               (shell-command-to-string
-                                (format (concat
-                                         "git blame -L %i,%i \"%s\""
-                                         " --porcelain --contents \"%s\""
-                                         " ; echo $?")
-                                        (nth 0 args) (1- (nth 1 args))
-                                        (buffer-file-name) temp-file))
-                               "\n"))
-                           (delete-file temp-file))))
+                            (let ((file (make-temp-file "why-this-git-"))
+                                  (text (buffer-substring-no-properties
+                                         (point-min) (point-max))))
+                              (with-temp-file file
+                                (insert text))
+                              file)))
+                       (unwind-protect
+                           (butlast
+                            (split-string
+                             (shell-command-to-string
+                              (format (concat
+                                       "git blame -L %i,%i \"%s\""
+                                       " --porcelain --contents \"%s\""
+                                       " ; echo $?")
+                                      (nth 0 args) (1- (nth 1 args))
+                                      (buffer-file-name) temp-file))
+                             "\n"))
+                         (delete-file temp-file))))
               (status (string-to-number (car (last blame))))
               line-data
               (i 0)



reply via email to

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