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

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

[elpa] externals/agitate 764644c218 15/67: Use 'length>' again since b6e


From: ELPA Syncer
Subject: [elpa] externals/agitate 764644c218 15/67: Use 'length>' again since b6e5cdb requires Emacs 28.1
Date: Wed, 28 Sep 2022 16:57:26 -0400 (EDT)

branch: externals/agitate
commit 764644c218382e028e6ea7889b323b726f4ac71f
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Use 'length>' again since b6e5cdb requires Emacs 28.1
---
 agitate.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/agitate.el b/agitate.el
index 2b28c8d377..c6e3e0bfc0 100644
--- a/agitate.el
+++ b/agitate.el
@@ -130,7 +130,7 @@ to the text at point."
 (defun agitate--log-edit-extract-file (with-file-extension)
   "Return file from `log-edit-files' without or WITH-FILE-EXTENSION."
   (when-let* ((files (log-edit-files))
-              (file (if (> (length files) 1)
+              (file (if (length> files 1)
                         (completing-read "Derive shortname from: " files nil t)
                     (car files)))
               (name (file-name-nondirectory file)))
@@ -155,7 +155,7 @@ file extension.  Else omit it."
 (defun agitate--vc-git-prompt-remote ()
   "Helper prompt for `agitate-git-push'."
   (when-let ((remotes (process-lines vc-git-program "remote")))
-    (if (> (length remotes) 1)
+    (if (length> remotes 1)
         (completing-read "Select Git remote: " remotes nil t)
       (car remotes))))
 



reply via email to

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