[Emacs-diffs] Changes to emacs/lisp/calendar/diary-lib.el

[Miles Bader]

Index: emacs/lisp/calendar/diary-lib.el
diff -c emacs/lisp/calendar/diary-lib.el:1.96 
emacs/lisp/calendar/diary-lib.el:1.97
*** emacs/lisp/calendar/diary-lib.el:1.96       Tue May 31 12:10:29 2005
--- emacs/lisp/calendar/diary-lib.el    Fri Jun 10 10:44:01 2005
***************
*** 543,557 ****
            (set-window-start window (point-min))))
        (message "Preparing diary...done"))))
  
! (defface diary-button-face '((((type pc) (class color))
!                  (:foreground "lightblue")))
    "Default face used for buttons."
    :version "22.1"
    :group 'diary)
  
  (define-button-type 'diary-entry
    'action #'diary-goto-entry
!   'face #'diary-button-face)
  
  (defun diary-goto-entry (button)
    (let ((marker (button-get button 'marker)))
--- 543,559 ----
            (set-window-start window (point-min))))
        (message "Preparing diary...done"))))
  
! (defface diary-button '((((type pc) (class color))
!                        (:foreground "lightblue")))
    "Default face used for buttons."
    :version "22.1"
    :group 'diary)
+ ;; backward-compatibility alias
+ (put 'diary-button-face 'face-alias 'diary-button)
  
  (define-button-type 'diary-entry
    'action #'diary-goto-entry
!   'face 'diary-button)
  
  (defun diary-goto-entry (button)
    (let ((marker (button-get button 'marker)))