[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/git-commit 18cf9140aa 2/2: Fix some issue reported by the
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/git-commit 18cf9140aa 2/2: Fix some issue reported by the byte-compiler |
Date: |
Tue, 24 Jan 2023 15:59:41 -0500 (EST) |
branch: elpa/git-commit
commit 18cf9140aa48d83e6f030b1324042f469da16304
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
Fix some issue reported by the byte-compiler
---
lisp/magit-clone.el | 2 +-
lisp/magit-mode.el | 2 ++
lisp/magit-tag.el | 2 +-
lisp/magit.el | 1 +
4 files changed, 5 insertions(+), 2 deletions(-)
diff --git a/lisp/magit-clone.el b/lisp/magit-clone.el
index 5b6e9b8f14..37e2312a83 100644
--- a/lisp/magit-clone.el
+++ b/lisp/magit-clone.el
@@ -228,7 +228,7 @@ Then show the status buffer for the new repository."
'sparse))
(defun magit-clone-internal (repository directory args &optional sparse)
- (let* ((checkout (not (memq (car args) '("--bare" "--mirror"))))
+ (let* ((checkout (not (member (car args) '("--bare" "--mirror"))))
(remote (or (transient-arg-value "--origin" args)
(magit-get "clone.defaultRemote")
"origin"))
diff --git a/lisp/magit-mode.el b/lisp/magit-mode.el
index 3381a78978..f00e4b1f69 100644
--- a/lisp/magit-mode.el
+++ b/lisp/magit-mode.el
@@ -35,6 +35,8 @@
(require 'help-mode)
(require 'transient)
+(defvar bookmark-make-record-function)
+
;;; Options
(defcustom magit-mode-hook
diff --git a/lisp/magit-tag.el b/lisp/magit-tag.el
index 31d9d8514e..951c591e07 100644
--- a/lisp/magit-tag.el
+++ b/lisp/magit-tag.el
@@ -69,7 +69,7 @@ With a prefix argument annotate the tag.
(magit-read-branch-or-commit "Place tag on")
(let ((args (magit-tag-arguments)))
(when current-prefix-arg
- (cl-pushnew "--annotate" args))
+ (cl-pushnew "--annotate" args :test #'equal))
args)))
(magit-run-git-with-editor "tag" args name rev))
diff --git a/lisp/magit.el b/lisp/magit.el
index a86783a9f9..e157a577ea 100644
--- a/lisp/magit.el
+++ b/lisp/magit.el
@@ -75,6 +75,7 @@
;; For `magit:--gpg-sign'
(declare-function epg-list-keys "epg" (context &optional name mode))
(declare-function epg-decode-dn "epg" (alist))
+(defvar epa-protocol)
;;; Options