branch: externals/denote-journal
commit 0d1a82a21ac98b28908813210af96542c9d536af
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>

    Change the name of a helper function and clarify its doc string
---
 denote-journal.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/denote-journal.el b/denote-journal.el
index e363edf92c..0265b9b84c 100644
--- a/denote-journal.el
+++ b/denote-journal.el
@@ -336,9 +336,9 @@ CALENDAR-DATE is a list of three numbers, in the form of 
(MONTH DAY YEAR)."
               (time (format-time-string "%T")))
     (date-to-time (format "%s-%02d-%02d %s" year month day time))))
 
-(defun denote-journal-calendar--date-at-point-to-identifier (calendar-date)
+(defun denote-journal-calendar--date-to-identifier (calendar-date)
   "Return path to Denote journal entry corresponding to CALENDAR-DATE.
-CALENDAR-DATE is commensurate with `calendar-cursor-to-date'."
+CALENDAR-DATE is a list of three numbers, in the form of (MONTH DAY YEAR)."
   (when-let* ((date (denote-journal-calendar--date-to-time calendar-date)))
     (denote-journal--entry-today date)))
 
@@ -351,7 +351,7 @@ among them."
   (unless (derived-mode-p 'calendar-mode)
     (user-error "Only use this command inside the `calendar'"))
   (if-let* ((calendar-date (calendar-cursor-to-date))
-            (files (denote-journal-calendar--date-at-point-to-identifier 
calendar-date))
+            (files (denote-journal-calendar--date-to-identifier calendar-date))
             (file (if (> (length files) 1)
                       (completing-read "Select journal entry: " files nil t)
                     (car files))))

Reply via email to