mirrors
/
ambevar-dotfiles
mirror of https://gitlab.com/ambrevar/dotfiles/
1
0
Fork 0
Code Issues Releases Wiki Activity

Emacs/Notmuch: Fix find-if -> cl-find-if.

master
Pierre Neidhardt 2020-09-08 14:59:19 +02:00
parent 0da56c8e4e
commit 9e2e0b19a6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
.emacs.d/lisp/init-notmuch.el
View File

@ -84,7 +84,7 @@
"notmuch-new"
nil
(lambda (_proc change)
(with-current-buffer (find-if (lambda (b)
(with-current-buffer (cl-find-if (lambda (b)
(with-current-buffer b
(eq major-mode 'notmuch-search-mode)))
(buffer-list))
@ -103,7 +103,7 @@
(make-process :name "gpg" :buffer nil
:command (list "gpg" "--decrypt"
(expand-file-name
(or (find-if (lambda (agenda) (string-suffix-p ".gpg" agenda))
(or (cl-find-if (lambda (agenda) (string-suffix-p ".gpg" agenda))
org-agenda-files)
(error "No .gpg file in `org-agenda-files'."))))
:sentinel sentinel)))