Skip to content

Commit

Permalink
avoid obsolete find-if
Browse files Browse the repository at this point in the history
  • Loading branch information
kaorahi committed Sep 21, 2024
1 parent 93528f3 commit 6fa3d3b
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 4 deletions.
2 changes: 2 additions & 0 deletions ChangeLog
Original file line number Diff line number Diff line change
@@ -1,5 +1,7 @@
2024-09-19 HIRAOKA Kazuyuki <kakkokakko@gmail.com>

* howm-misc.el (howm-setup-change-log): avoid obsolete find-if

* README.md: add screenshot by @jabirali
thx > Jabir Ali Ouassou san (jabir.ali.ouassou at hvl.no)
https://github.com/kaorahi/howm/issues/13#issuecomment-2358456865
Expand Down
8 changes: 4 additions & 4 deletions howm-misc.el
Original file line number Diff line number Diff line change
Expand Up @@ -911,10 +911,10 @@ When DOTS-STR is non-nil, it is used instead of \"...\"."
(setq howm-menu-top nil)
(defadvice howm-exclude-p (around change-log (filename) activate)
(setq ad-return-value
(not (find-if (lambda (dir)
(string= (howm-file-name)
(file-relative-name filename dir)))
(howm-search-path)))))
(not (cl-find-if (lambda (dir)
(string= (howm-file-name)
(file-relative-name filename dir)))
(howm-search-path)))))
(defadvice howm-create-file-with-title (around change-log (title) activate)
(howm-create-file)
(when (string-match howm-keyword-regexp title)
Expand Down

0 comments on commit 6fa3d3b

Please sign in to comment.