diff options
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/calendar/calendar.el | 6 |
2 files changed, 9 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 87490752f3f..d1f8d9d34ce 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2009-03-02 Glenn Morris <rgm@gnu.org> | 1 | 2009-03-02 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * calendar/calendar.el (diary-date-forms, calendar-date-display-form): | ||
| 4 | Add :set-after listing variables on which we might depend. | ||
| 5 | |||
| 3 | * mail/rmail.el (rmail-reply): Use rmail-apply-in-message so that this | 6 | * mail/rmail.el (rmail-reply): Use rmail-apply-in-message so that this |
| 4 | function has access to all the headers, not just the visible ones. | 7 | function has access to all the headers, not just the visible ones. |
| 5 | 8 | ||
diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index 172a55cfc84..47bf62fa06a 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el | |||
| @@ -836,6 +836,9 @@ For examples of three common styles, see `diary-american-date-forms', | |||
| 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)) |
| @@ -903,6 +906,9 @@ would give the usual American style in fixed-length fields. The variables | |||
| 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) |