branch: externals/agitate
commit d6aaced96910141687e34ce590655d9d33c68f7a
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Actually depend on Emacs 27.1
---
agitate.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/agitate.el b/agitate.el
index c69f057679..808a96ff55 100644
--- a/agitate.el
+++ b/agitate.el
@@ -7,7 +7,7 @@
;; URL: https://git.sr.ht/~protesilaos/NOT-YET-AVAILABLE
;; Mailing-List: https://lists.sr.ht/~protesilaos/NOT-YET-AVAILABLE
;; Version: 0.0.0
-;; Package-Requires: ((emacs "28.1"))
+;; Package-Requires: ((emacs "27.1"))
;; Keywords: convenience, version control, git
;; This file is NOT part of GNU Emacs.
@@ -99,7 +99,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)))
@@ -124,7 +124,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))))
