[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Appt Msg Window problem
From: |
Tak Ota |
Subject: |
Appt Msg Window problem |
Date: |
Mon, 10 May 2004 14:07:16 -0700 (PDT) |
It seems appointment message window doesn't display correctly. Try
evaluating (appt-disp-window "5" "3" "Test") and see the window
splits overly. Following patch fixes this problem.
BTW, `split-window' doc string does not explain about its return
value.
-Tak
*** ../../../../pub/emacs/pure/emacs-21.3.50/lisp/calendar/appt.el Wed Mar
24 10:36:20 2004
--- appt.el Mon May 10 13:51:21 2004
***************
*** 449,456 ****
(same-window-p (buffer-name appt-disp-buf)))
;; By default, split the bottom window and use the lower part.
(appt-select-lowest-window)
! (split-window))
! (pop-to-buffer appt-disp-buf))
(setq mode-line-format
(concat "-------------------- Appointment in "
min-to-app " minutes. " new-time " %-"))
--- 449,456 ----
(same-window-p (buffer-name appt-disp-buf)))
;; By default, split the bottom window and use the lower part.
(appt-select-lowest-window)
! (select-window (split-window)))
! (switch-to-buffer appt-disp-buf))
(setq mode-line-format
(concat "-------------------- Appointment in "
min-to-app " minutes. " new-time " %-"))
- Appt Msg Window problem,
Tak Ota <=