diff options
| -rw-r--r-- | lisp/km-magit.el | 2 | ||||
| -rw-r--r-- | lisp/km-org.el | 2 |
2 files changed, 2 insertions, 2 deletions
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 diff --git a/lisp/km-org.el b/lisp/km-org.el index ce4cac1..22055a5 100644 --- a/lisp/km-org.el +++ b/lisp/km-org.el @@ -585,7 +585,7 @@ to be easily overriden.") ;;;###autoload (defun km/org-open-last-pdf () (interactive) - (let ((file (cl-find-if (lambda (x) (string-match-p "\\.pdf\\'" x)) + (let ((file (cl-find-if (lambda (x) (string-suffix-p ".pdf" x)) recentf-list))) (when file (org-open-file file)))) |