(appt-disp-window): Do a set-buffer when the

frame can't be split.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9d6ea22d13c36dcf2df3f437d40cf8feef41e4b8..fe34317f72236c69ce56e076b1fafaaa7a677fa2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-11-24  Martin Rudalics  <rudalics@gmx.at>
+
+       * calendar/appt.el (appt-disp-window): Do a set-buffer when the
+       frame can't be split.
+
 2008-11-24  Ulf Jasper  <ulf@web.de>
 
        * net/newst-treeview.el (newsticker--treeview-current-feed): Doc

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index fa6956687e869c80793051778ad4dc1c0c24e6a6..878e8897edcd85d7e6cff11a7260ee1fd50d4bb2 100644 (file)
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -417,7 +417,9 @@ message APPT-MSG in a separate buffer."
       (and (minibufferp) (display-multi-frame-p) (other-frame 1)))
     (if (cdr (assq 'unsplittable (frame-parameters)))
         ;; In an unsplittable frame, use something somewhere else.
-        (display-buffer appt-disp-buf)
+       (progn
+         (set-buffer appt-disp-buf)
+         (display-buffer appt-disp-buf))
       (unless (or (special-display-p (buffer-name appt-disp-buf))
                   (same-window-p (buffer-name appt-disp-buf)))
         ;; By default, split the bottom window and use the lower part.