branch: externals/agitate
commit 764644c218382e028e6ea7889b323b726f4ac71f
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@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))))
