From 2c4abeb8e8ff89e682186862ae179c49a46bb948 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 8 Mar 2008 21:36:14 +0000 Subject: [PATCH] (diary-bahai-mark-entries) (diary-bahai-insert-entry, diary-bahai-insert-monthly-entry) (diary-bahai-insert-yearly-entry): Doc fixes. --- lisp/calendar/cal-bahai.el | 21 ++++++++++----------- 1 file changed, 10 insertions(+), 11 deletions(-) diff --git a/lisp/calendar/cal-bahai.el b/lisp/calendar/cal-bahai.el index 6263cb9bd92..3e522572191 100644 --- a/lisp/calendar/cal-bahai.el +++ b/lisp/calendar/cal-bahai.el @@ -305,16 +305,15 @@ calendar. This function is provided for use with the (defun diary-bahai-mark-entries () "Mark days in the calendar window that have Bahá'í date diary entries. -Each entry in diary-file (or included files) visible in the calendar -window is marked. Bahá'í date entries are prefaced by a -bahai-diary-entry-symbol \(normally a B`I'). The same -diary-date-forms govern the style of the Bahá'í calendar entries, +Each entry in `diary-file' (or included files) visible in the calendar +window is marked. Bahá'í date entries are prefaced by +`bahai-diary-entry-symbol' (normally a \"B\"). The same +`diary-date-forms' govern the style of the Bahá'í calendar entries, except that the Bahá'í month names must be spelled in full. The Bahá'í months are numbered from 1 to 12 with Bahá being 1 and 12 being -`Alá. Bahá'í date diary entries that begin with a -diary-nonmarking-symbol will not be marked in the calendar. This -function is provided for use as part of the -nongregorian-diary-marking-hook." +`Alá. Bahá'í date diary entries that begin with `diary-nonmarking-symbol' +will not be marked in the calendar. This function is provided for use as +part of `nongregorian-diary-marking-hook'." (let ((d diary-date-forms)) (while d (let* @@ -475,7 +474,7 @@ A value of 0 in any position is a wildcard." (defun diary-bahai-insert-entry (arg) "Insert a diary entry. For the Bahá'í date corresponding to the date indicated by point. -Prefix arg will make the entry nonmarking." +Prefix argument ARG makes the entry nonmarking." (interactive "P") (let* ((calendar-month-name-array calendar-bahai-month-name-array)) (make-diary-entry @@ -492,7 +491,7 @@ Prefix arg will make the entry nonmarking." (defun diary-bahai-insert-monthly-entry (arg) "Insert a monthly diary entry. For the day of the Bahá'í month corresponding to the date indicated by point. -Prefix arg will make the entry nonmarking." +Prefix argument ARG makes the entry nonmarking." (interactive "P") (let* ((calendar-date-display-form (if european-calendar-style '(day " * ") '("* " day ))) @@ -510,7 +509,7 @@ Prefix arg will make the entry nonmarking." (defun diary-bahai-insert-yearly-entry (arg) "Insert an annual diary entry. For the day of the Bahá'í year corresponding to the date indicated by point. -Prefix arg will make the entry nonmarking." +Prefix argument ARG will make the entry nonmarking." (interactive "P") (let* ((calendar-date-display-form (if european-calendar-style -- 2.11.4.GIT