From b88891fe0675794f7b78ccd2331e6c205fa6dae0 Mon Sep 17 00:00:00 2001 From: Christophe Deleuze Date: Tue, 16 Aug 2022 00:04:53 +0200 Subject: [PATCH] A few docstring fixes --- calfw-org.el | 2 +- calfw.el | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/calfw-org.el b/calfw-org.el index 4590f1c..2fbac23 100644 --- a/calfw-org.el +++ b/calfw-org.el @@ -487,7 +487,7 @@ TEXT1 < TEXT2. This function makes no-time items in front of timed-items." )) (defun cfw:org-read-date-command () - "Move the cursor to the specified date." + "Read a date and return it as a calendar date value." (interactive) (cfw:emacs-to-calendar (org-read-date nil 'to-time))) diff --git a/calfw.el b/calfw.el index a5c8bbf..6616afd 100644 --- a/calfw.el +++ b/calfw.el @@ -463,7 +463,7 @@ ones of DATE2. Otherwise is `nil'." ret)))) (defun cfw:parse-str-time (str) - "Parsese a time string of the format HH:MM to an internal format." + "Parse a time string of the format HH:MM to an internal format." (when (string-match "\\([[:digit:]]\\{2\\}\\):\\([[:digit:]]\\{2\\}\\)" str) (cfw:time (string-to-number (match-string 1 str)) (string-to-number (match-string 2 str))))) @@ -473,7 +473,7 @@ ones of DATE2. Otherwise is `nil'." (cfw:emacs-to-calendar (cfw:parsetime-emacs str))) (defun cfw:read-date-command-simple (string-date) - "Move the cursor to the specified date." + "Read a date and return it as a calendar date value." (interactive "sInput Date (YYYY/MM/DD): ") (cfw:parsetime string-date)) @@ -582,7 +582,7 @@ white (negative color of `cfw:source-period-bgcolor') is used." end-date ; end date of the event [cfw:date] (optional) end-time ; end of the event (optional) description ; event description [string] (optional) - location ; location [strting] (optional) + location ; location [string] (optional) source ; [internal] source of the event )