Mercurial > emacs
comparison lisp/calendar/calendar.el @ 102354:3206ad427d3c
(diary-date-forms, calendar-date-display-form):
Add :set-after listing variables on which we might depend.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Mon, 02 Mar 2009 07:00:43 +0000 |
| parents | 0c901689da73 |
| children | 564ef05eedbc |
comparison
equal
deleted
inserted
replaced
| 102353:a2de015c936d | 102354:3206ad427d3c |
|---|---|
| 834 (symbol :tag "Keyword") | 834 (symbol :tag "Keyword") |
| 835 (choice symbol regexp)))) | 835 (choice symbol regexp)))) |
| 836 (repeat (list :inline t :format "%v" | 836 (repeat (list :inline t :format "%v" |
| 837 (symbol :tag "Keyword") | 837 (symbol :tag "Keyword") |
| 838 (choice symbol regexp))))) | 838 (choice symbol regexp))))) |
| 839 :set-after '(calendar-date-style diary-iso-date-forms | |
| 840 diary-european-date-forms | |
| 841 diary-american-date-forms) | |
| 839 :initialize 'custom-initialize-default | 842 :initialize 'custom-initialize-default |
| 840 :set (lambda (symbol value) | 843 :set (lambda (symbol value) |
| 841 (unless (equal value (eval symbol)) | 844 (unless (equal value (eval symbol)) |
| 842 (custom-set-default symbol value) | 845 (custom-set-default symbol value) |
| 843 (setq diary-font-lock-keywords (diary-font-lock-keywords)) | 846 (setq diary-font-lock-keywords (diary-font-lock-keywords)) |
| 901 would give the usual American style in fixed-length fields. The variables | 904 would give the usual American style in fixed-length fields. The variables |
| 902 `calendar-iso-date-display-form', `calendar-european-date-display-form', and | 905 `calendar-iso-date-display-form', `calendar-european-date-display-form', and |
| 903 `calendar-american-date-display-form' provide some defaults for three common | 906 `calendar-american-date-display-form' provide some defaults for three common |
| 904 styles." | 907 styles." |
| 905 :type 'sexp | 908 :type 'sexp |
| 909 :set-after '(calendar-date-style calendar-iso-date-display-form | |
| 910 calendar-european-date-display-form | |
| 911 calendar-american-date-display-form) | |
| 906 :group 'calendar) | 912 :group 'calendar) |
| 907 | 913 |
| 908 (defun calendar-set-date-style (style) | 914 (defun calendar-set-date-style (style) |
| 909 "Set the style of calendar and diary dates to STYLE (a symbol). | 915 "Set the style of calendar and diary dates to STYLE (a symbol). |
| 910 The valid styles are described in the documentation of `calendar-date-style'." | 916 The valid styles are described in the documentation of `calendar-date-style'." |