Mercurial > emacs
diff lisp/calendar/diary-lib.el @ 17626:68cce262538d
Use defcustom.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 03 May 1997 04:58:13 +0000 |
parents | ff25eb6a7d11 |
children | b3514551f08d |
line wrap: on
line diff
--- a/lisp/calendar/diary-lib.el Sat May 03 04:56:48 1997 +0000 +++ b/lisp/calendar/diary-lib.el Sat May 03 04:58:13 1997 +0000 @@ -1233,7 +1233,7 @@ "Day of year and number of days remaining in the year of date diary entry." (calendar-day-of-year-string date)) -(defvar diary-remind-message +(defcustom diary-remind-message '("Reminder: Only " (if (= 0 (% days 7)) (concat (int-to-string (/ days 7)) (if (= 7 days) " week" " weeks")) @@ -1245,7 +1245,9 @@ Used by the function `diary-remind', a pseudo-pattern is a list of expressions that can involve the keywords `days' (a number), `date' (a list of -month, day, year), and `diary-entry' (a string).") +month, day, year), and `diary-entry' (a string)." + :type 'sexp + :group 'diary) (defun diary-remind (sexp days &optional marking) "Provide a reminder of a diary entry.