[nongnu] elpa/org-journal ae339d9024 4/7: applied patch from @TPKato - thanks!

[ELPA Syncer]

branch: elpa/org-journal
commit ae339d902432486265ade87ee2249ad085b9d72a
Author: Jason May <jmay@pobox.com>
Commit: Jason May <jmay@pobox.com>

    applied patch from @TPKato - thanks!
---
 tests/org-journal-test.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/tests/org-journal-test.el b/tests/org-journal-test.el
index 8ab3ab861f..090f64eca7 100644
--- a/tests/org-journal-test.el
+++ b/tests/org-journal-test.el
@@ -227,10 +227,11 @@
         (save-buffer)
         (kill-buffer)
         (let ((message-marker nil))
-          (fset 'message (lambda (x y) (setq message-marker x)))
-          (org-journal-read-or-display-entry (encode-time 0 0 0 2 1 2019) 
'noselect)
-          (should (equal "No journal entry for this date." message-marker))
-          ))))
+          (cl-letf (((symbol-function 'message)
+                     #'(lambda (x &rest y) (setq message-marker x))))
+            (org-journal-read-or-display-entry (encode-time 0 0 0 2 1 2019) 
'noselect)
+            (should (equal "No journal entry for this date." message-marker))
+            )))))
 
 (ert-deftest org-journal-search-build-file-list-test ()
   "Test for `org-journal--search-build-file-list'."