From 1f9a6af0809c6643877a4250d10ac2dbf6eb5815 Mon Sep 17 00:00:00 2001 From: Ivan Andrus Date: Sat, 6 Apr 2024 20:08:12 -0500 Subject: [PATCH 1/3] Update README to mention memento-mori-initial-scratch-message and contributing --- README.md | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/README.md b/README.md index 6a949f6..5e04708 100644 --- a/README.md +++ b/README.md @@ -74,3 +74,13 @@ desired reflection. If the mode-line is too much, you could add it to your `org-agenda-custom-commands` or similar. + +You can also set memento-mori-initial-scratch-message to a format something like +"%q\n\n%m\n" so that the initial scratch buffer will contain a random quote +followed by the current memento. + +## Contributing + +Feel free to open issues, pull requests, etc. In particular, I'm sure there are +many good quotes that I didn't include in `memento-mori-quotes`, so please send +them in! Also if you have a good memento, I would love to have those too. From 92aa9ef050aa783410b337702f89aed7df052106 Mon Sep 17 00:00:00 2001 From: Ivan Andrus Date: Sat, 6 Apr 2024 20:13:48 -0500 Subject: [PATCH 2/3] Fix wide docstring warning --- memento-mori.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/memento-mori.el b/memento-mori.el index 4127fb0..f3e0a1c 100644 --- a/memento-mori.el +++ b/memento-mori.el @@ -395,7 +395,7 @@ Try M-x customize-group memento-mori RET")) 'ignore)))) (defun memento-mori--add-mementos () - "Adds constructs to mode line and/or frame title to display `memento-mori-mementos'. + "Adds constructs to mode line and/or frame title to display mementos. Where it adds it is controlled by `memento-mori-display-in-modeline' and `memento-mori-display-in-frame-title' respectively. From f6199ad2aa4404911210c044820e65092992e8c1 Mon Sep 17 00:00:00 2001 From: Ivan Andrus Date: Sat, 6 Apr 2024 21:16:50 -0500 Subject: [PATCH 3/3] Fix warning about unbound variable --- memento-mori.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/memento-mori.el b/memento-mori.el index f3e0a1c..6ca5de0 100644 --- a/memento-mori.el +++ b/memento-mori.el @@ -370,6 +370,9 @@ This is a floating point number based on `memento-mori-birth-date'." (?p . ,(truncate percent))) 'ignore))) +;; Forward declare initial-scratch-message which should be defined at run time +(defvar initial-scratch-message) + (defun memento-mori--update () "Update `memento-mori-string' based on the current time." (let ((has-set-new (not (eq memento-mori-mementos