+2001-01-12 17:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
+
+ * gnus-win.el (gnus-configure-windows): switch-to-buffer in XEmacs.
+ (gnus-remove-some-windows): Ditto.
+
2001-01-12 14:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
* gnus-art.el (article-make-date-line): 11th.
(gnus-delete-windows-in-gnusey-frames))
;; Just remove some windows.
(gnus-remove-some-windows)
- (set-buffer nntp-server-buffer))
+ (if (featurep 'xemacs)
+ (switch-to-buffer nntp-server-buffer)
+ (set-buffer nntp-server-buffer)))
(select-frame frame)))
(let (gnus-window-frame-focus)
- (set-buffer nntp-server-buffer)
+ (if (featurep 'xemacs)
+ (switch-to-buffer nntp-server-buffer)
+ (set-buffer nntp-server-buffer))
(gnus-configure-frame split)
(when gnus-window-frame-focus
(select-frame (window-frame gnus-window-frame-focus))))))))
lowest-buf buf))))
(when lowest-buf
(pop-to-buffer lowest-buf)
- (set-buffer nntp-server-buffer))
+ (if (featurep 'xemacs)
+ (switch-to-buffer nntp-server-buffer)
+ (set-buffer nntp-server-buffer)))
(mapcar (lambda (b) (delete-windows-on b t)) bufs))))
(provide 'gnus-win)