Lines Matching +defs:kill +defs:buffer
45 "Obsolete variable. See `gnus-buffer-configuration'.")
70 (defvar gnus-buffer-configuration
147 (if gnus-bug-create-help-buffer '("*Gnus Help Bug*" 0.5))
174 (defvar gnus-window-to-buffer
175 '((group . gnus-group-buffer)
176 (summary . gnus-summary-buffer)
177 (article . gnus-article-buffer)
178 (server . gnus-server-buffer)
180 (edit-group . gnus-group-edit-buffer)
181 (edit-form . gnus-edit-form-buffer)
182 (edit-server . gnus-server-edit-buffer)
183 (group-carpal . gnus-carpal-group-buffer)
184 (summary-carpal . gnus-carpal-summary-buffer)
185 (server-carpal . gnus-carpal-server-buffer)
186 (browse-carpal . gnus-carpal-browse-buffer)
187 (edit-score . gnus-score-edit-buffer)
188 (message . gnus-message-buffer)
189 (mail . gnus-message-buffer)
190 (post-news . gnus-message-buffer)
191 (faq . gnus-faq-buffer)
192 (tree . gnus-tree-buffer)
195 (info . gnus-info-buffer)
196 (category . gnus-category-buffer)
198 (draft . gnus-draft-buffer))
199 "Mapping from short symbols to buffer names or buffer variables.")
215 (defun gnus-kill-gnus-frames ()
277 "Add the window configuration CONF to `gnus-buffer-configuration'."
278 (setq gnus-buffer-configuration
279 (cons conf (delq (assq (car conf) gnus-buffer-configuration)
280 gnus-buffer-configuration))))
284 (defun gnus-window-to-buffer-helper (obj)
297 (or (get-buffer-window (current-buffer)) (selected-window))))
301 ;; This might be an old-style buffer config.
310 (while (and (not (assq (car split) gnus-window-to-buffer))
326 ;; This is a buffer to be selected.
328 (let ((buffer (cond ((stringp type) type)
329 (t (cdr (assq type gnus-window-to-buffer))))))
330 (unless buffer
331 (error "Invalid buffer type: %s" type))
332 (let ((buf (gnus-get-buffer-create
333 (gnus-window-to-buffer-helper buffer))))
334 (if (eq buf (window-buffer (selected-window))) (set-buffer buf)
335 (switch-to-buffer buf)))
364 ;; Select the frame that has the selected buffer.
373 (while (and (not (assq (car sub) gnus-window-to-buffer))
428 (cadr (assq setting gnus-buffer-configuration))
435 (error "No such setting in `gnus-buffer-configuration': %s" setting))
440 ;; put point in the assigned buffer, and do not touch the
444 ;; Make sure "the other" buffer, nntp-server-buffer, is live.
445 (unless (gnus-buffer-live-p nntp-server-buffer)
446 (nnheader-init-server-buffer))
463 (switch-to-buffer nntp-server-buffer)
464 (set-buffer nntp-server-buffer)))
469 (switch-to-buffer nntp-server-buffer)
470 (set-buffer nntp-server-buffer))
488 (when (memq (window-buffer window) buffers)
500 type buffer win buf)
512 (while (and (not (assq (car split) gnus-window-to-buffer))
520 ;; A buffer.
522 (setq buffer (cond ((stringp type) type)
523 (t (cdr (assq type gnus-window-to-buffer)))))
524 (unless buffer
525 (error "Invalid buffer type: %s" type))
526 (if (and (setq buf (get-buffer (gnus-window-to-buffer-helper buffer)))
527 (setq win (gnus-get-buffer-window buf t)))
547 (when (get-buffer-window buf)
549 (pop-to-buffer buf)
555 (pop-to-buffer lowest-buf)
557 (switch-to-buffer nntp-server-buffer)
558 (set-buffer nntp-server-buffer)))
572 (defun gnus-get-buffer-window (buffer &optional frame)
579 (get-buffer-window-list buffer nil frame)))))
581 (get-buffer-window buffer frame))))