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

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

[elpa] elpa-admin 4f6e2f0558: * elpa-admin.el (elpa--pull): Fix paren ty


From: Stefan Monnier
Subject: [elpa] elpa-admin 4f6e2f0558: * elpa-admin.el (elpa--pull): Fix paren typo
Date: Mon, 10 Jan 2022 16:58:11 -0500 (EST)

branch: elpa-admin
commit 4f6e2f055811e408b3cd331cf77200336cb06a1e
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * elpa-admin.el (elpa--pull): Fix paren typo
---
 elpa-admin.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 363919d9ab..d570c3c6aa 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -1578,7 +1578,7 @@ arbitrary code."
       (let ((elpaa--debug nil))
         (elpaa--call t "git" "checkout" "--"
                      (concat (file-name-nondirectory dirname) "-pkg.el")))
-      (erase-buffer)              ;Throw away the error message we usually get.
+      (erase-buffer)     ;Throw away the error message we usually get.
       (cond
        ((file-directory-p ".git")
         (message "Running git pull in %S" default-directory)
@@ -1607,12 +1607,12 @@ arbitrary code."
                      ;; There is an upstream to set it to!
                      (elpaa--git-branch-p ortb))
                 (elpaa--call t "git" "branch" "--set-upstream-to" ortb))
-              (if (or (not ortb)    ;Not a worktree, presumably.
-                      (elpaa--git-branch-p ortb)
+              (if (or (not ortb)        ;Not a worktree, presumably.
+                      (elpaa--git-branch-p ortb))
                  (progn
                    (message "Updating worktree in %S" default-directory)
                    (elpaa--call t "git" "merge"))
-               (message "Not pushed to origin yet.  Not updating 
worktree")))))))
+               (message "Not pushed to origin yet.  Not updating 
worktree"))))))
        (t (error "No .git in %S" default-directory)))
       (unless (and (eobp) (bobp))
         (message "Updated %s:%s%s" dirname



reply via email to

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