summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/km-magit.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/km-magit.el b/lisp/km-magit.el
index 4fed9c0..4ab9125 100644
--- a/lisp/km-magit.el
+++ b/lisp/km-magit.el
@@ -280,8 +280,8 @@ and 'squash!' titles."
(when (not msgs)
(user-error "No fixup or squash commits found"))
;; Find earliest commit.
- (goto-char (point-min))
(dolist (msg msgs)
+ (goto-char (point-min))
(when (re-search-forward (concat "[a-z0-9]+ " msg "\n") nil t)
(push (match-beginning 0) commit-pts))))
(if commit-pts