# HG changeset patch # User Glenn Morris # Date 1235977243 0 # Node ID 3206ad427d3c3addab094a72ed07b1107285f08e # Parent a2de015c936d3e399a4ebc870626b9de080af6d1 (diary-date-forms, calendar-date-display-form): Add :set-after listing variables on which we might depend. diff -r a2de015c936d -r 3206ad427d3c lisp/ChangeLog --- a/lisp/ChangeLog Mon Mar 02 02:19:24 2009 +0000 +++ b/lisp/ChangeLog Mon Mar 02 07:00:43 2009 +0000 @@ -1,5 +1,8 @@ 2009-03-02 Glenn Morris + * calendar/calendar.el (diary-date-forms, calendar-date-display-form): + Add :set-after listing variables on which we might depend. + * mail/rmail.el (rmail-reply): Use rmail-apply-in-message so that this function has access to all the headers, not just the visible ones. diff -r a2de015c936d -r 3206ad427d3c lisp/calendar/calendar.el --- a/lisp/calendar/calendar.el Mon Mar 02 02:19:24 2009 +0000 +++ b/lisp/calendar/calendar.el Mon Mar 02 07:00:43 2009 +0000 @@ -836,6 +836,9 @@ (repeat (list :inline t :format "%v" (symbol :tag "Keyword") (choice symbol regexp))))) + :set-after '(calendar-date-style diary-iso-date-forms + diary-european-date-forms + diary-american-date-forms) :initialize 'custom-initialize-default :set (lambda (symbol value) (unless (equal value (eval symbol)) @@ -903,6 +906,9 @@ `calendar-american-date-display-form' provide some defaults for three common styles." :type 'sexp + :set-after '(calendar-date-style calendar-iso-date-display-form + calendar-european-date-display-form + calendar-american-date-display-form) :group 'calendar) (defun calendar-set-date-style (style)