From cdfb34ece036655f9527d748af9623675bba12d1 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Wed, 13 Jan 2021 01:00:43 -0500 Subject: Prefer string-suffix-p to string-match-p --- lisp/km-magit.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/km-magit.el') diff --git a/lisp/km-magit.el b/lisp/km-magit.el index ced8bed..de39bc9 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -897,7 +897,7 @@ appending [M/N] to each entry." (apply #'magit-run-git "format-patch" upstream (concat "--base=" upstream) args) (let* ((patches (or (seq-filter - (lambda (f) (string-match-p "\\.patch\\'" f)) + (lambda (f) (string-suffix-p ".patch" f)) (magit-untracked-files)) (error "There should be patches"))) (cover (seq-find -- cgit v1.2.3