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

[Lute Kamstra]

Index: emacs/lisp/calendar/calendar.el
diff -c emacs/lisp/calendar/calendar.el:1.171 
emacs/lisp/calendar/calendar.el:1.172
*** emacs/lisp/calendar/calendar.el:1.171       Fri Jun 10 10:43:42 2005
--- emacs/lisp/calendar/calendar.el     Sun Jun 12 08:57:58 2005
***************
*** 2447,2453 ****
  \\<calendar-mode-map>\\[calendar-goto-info-node] from within the calendar.
  
  \\<calendar-mode-map>\\{calendar-mode-map}"
- 
    (kill-all-local-variables)
    (setq major-mode 'calendar-mode)
    (setq mode-name "Calendar")
--- 2447,2452 ----
***************
*** 2460,2466 ****
    (make-local-variable 'displayed-month);;  Month in middle of window.
    (make-local-variable 'displayed-year)       ;;  Year in middle of window.
    (set (make-local-variable 'font-lock-defaults)
!        '(calendar-font-lock-keywords t)))
  
  (defun calendar-string-spread (strings char length)
    "Concatenate list of STRINGS separated with copies of CHAR to fill LENGTH.
--- 2459,2466 ----
    (make-local-variable 'displayed-month);;  Month in middle of window.
    (make-local-variable 'displayed-year)       ;;  Year in middle of window.
    (set (make-local-variable 'font-lock-defaults)
!        '(calendar-font-lock-keywords t))
!   (run-mode-hooks 'calendar-mode-hook))
  
  (defun calendar-string-spread (strings char length)
    "Concatenate list of STRINGS separated with copies of CHAR to fill LENGTH.