[nongnu] elpa/git-commit 70843f133c 6/7: Fix switch from -replace to cl-substitute

[ELPA Syncer]

branch: elpa/git-commit
commit 70843f133c0cc0fb41894ee52410584331117258
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Fix switch from -replace to cl-substitute
    
    When creating [1: ecccdfa3a4], I did not notice that the argument
    order differs between these functions.
    
    1: 2023-07-28 ecccdfa3a4587b2e2139df87d7df04138b4e5218
       Use cl-substitute instead of -replace
---
 lisp/magit-refs.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/magit-refs.el b/lisp/magit-refs.el
index 868e09954a..6a7d074bd3 100644
--- a/lisp/magit-refs.el
+++ b/lisp/magit-refs.el
@@ -571,7 +571,7 @@ line is inserted at all."
                                        (concat "refs/remotes/" remote)
                                        magit-buffer-arguments))
           (pcase-let ((`(,head-branch ,branch ,ref ,msg)
-                       (cl-substitute "" nil
+                       (cl-substitute nil ""
                                       (split-string line "\0")
                                       :test #'equal)))
             (if head-branch
@@ -660,7 +660,7 @@ line is inserted at all."
 (defun magit-refs--format-local-branch (line)
   (pcase-let ((`(,head ,branch ,ref ,upstream ,u:ref ,u:track
                        ,push ,p:ref ,p:track ,msg)
-               (cl-substitute "" nil (split-string line "\0") :test #'equal)))
+               (cl-substitute nil "" (split-string line "\0") :test #'equal)))
     (when (or (not branch)
               (magit-refs--insert-refname-p branch))
       (let* ((headp (equal head "*"))