diff --git a/ChangeLog b/ChangeLog
index 06aeb6e..9fbf208 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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
diff --git a/howm-misc.el b/howm-misc.el
index e9c618e..6bd088f 100644
--- a/howm-misc.el
+++ b/howm-misc.el
@@ -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)