[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#9215: Reused window made dedicated

From: Stefan Monnier
Subject: bug#9215: Reused window made dedicated
Date: Sun, 17 Jul 2011 23:47:58 -0400

In my setup (where *Group* matches some entry in
special-display-regexp), M-: (switch-to-buffer "*Group*") RET now sets
the selected window as dedicated.  I can see that
display-buffer-reuse-window gets called with a (dedicate . t) entry in

Maybe it should be possible to specify such a behavior, but it clearly
shouldn't be the way it works by default.  I use the patch below as
a workaround for now.


=== modified file 'lisp/window.el'
--- lisp/window.el      2011-07-17 01:42:13 +0000
+++ lisp/window.el      2011-07-18 03:46:08 +0000
@@ -4858,6 +4858,7 @@
 specifiers.  Optional argument OTHER-WINDOW, if non-nil, means do
 not use the selected window.  Return the window chosen to display
 BUFFER, nil if none was found."
+  (push '(dedicate . nil) specifiers)
   (let* ((method-window (nth 0 method))
         (method-buffer (nth 1 method))
         (method-frame (nth 2 method))


In GNU Emacs (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2011-07-16 on ceviche
Windowing system distributor `The X.Org Foundation', version 11.0.11002000
configured using `configure  'CFLAGS=-Wall -Wno-pointer-sign 
-g -O1 -I/usr/include/GNUstep' '--enable-maintainer-mode' 

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: fr_CH.UTF-8
  value of $XMODIFIERS: nil
  locale-coding-system: utf-8-unix
  default enable-multibyte-characters: t

Major mode: Fundamental

Minor modes in effect:
  electric-pair-mode: t
  electric-indent-mode: t
  url-handler-mode: t
  global-reveal-mode: t
  reveal-mode: t
  auto-insert-mode: t
  savehist-mode: t
  minibuffer-electric-default-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
M-: ( s w i t c h - t o - b u f f e r SPC " * G r o 
u p * C-e <return> <switch-frame> <switch-frame> <help-echo> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<help-echo> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> q <switch-frame> 
<switch-frame> C-h v i n h i <tab> t r <tab> <return> 
<switch-frame> <switch-frame> <switch-frame> <help-echo> 
c <switch-frame> <switch-frame> M-: i n h i b i <M-tab> 
t r a c e <return> q M-: M-p ( d e f v a r SPC C-e 
SPC n i l ) <return> M-: M-p M-p M-p <return> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> C-x 5 
b * t r a <tab> <return> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<down-mouse-1> <mouse-movement> <mouse-1> C-h f <return> 
<switch-frame> <help-echo> <down-mouse-1> <mouse-2> 
<switch-frame> <switch-frame> <switch-frame> <down> 
<left> <right> <down> <left> <down> <right> <left> 
<right> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <left> <right> <switch-frame> 
<switch-frame> q <switch-frame> <switch-frame> <help-echo> 
<switch-frame> C-u C-M-x <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> M-: M-p <return> <switch-frame> 
<switch-frame> n n n n n n n q <switch-frame> <switch-frame> 
M-: M-p <return> <switch-frame> <switch-frame> n n 
q <switch-frame> C-M-x <down-mouse-1> <mouse-movement> 
<mouse-1> C-s C-w C-w C-w C-w C-s SPC ( C-s C-a <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> C-u C-M-x 
<switch-frame> <switch-frame> <switch-frame> C-g C-g 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<help-echo> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> M-x r 
e p o r t - e m <tab> <return>

Recent messages:

Result: "*Group*"

Result: ((reuse-window same same nil) (reuse-window other same 0) (reuse-window 
nil same 0) (pop-up-frame t) (pop-up-frame-alist (width . 80) (height . 50)) 
(dedicate . t) (pop-up-frame t) (pop-up-window (largest) (lru)) 
(pop-up-window-min-width . 80) (pop-up-window-min-height . 40) (dedicate . 
soft) (reuse-window-even-sizes . t) (other-window-means-other-frame . t))
Back to top level.
ad-handle-definition: `display-buffer-normalize-specifiers' got redefined
Mark saved where search started
Edebug: display-buffer-normalize-default
Quit [3 times]

Load-path shadows:
None found.

(sort mail-extr emacsbug cl-specs xscheme trace testcover scheme unsafep
re-builder shadow inf-lisp ielm pp comint ring ert ewoc elp edebug
cust-print cus-edit cus-start cus-load vc-bzr filecache find-func
multi-isearch debug qp gnus-ml nndraft nnmh rfc2104 gnutls
network-stream starttls nnimap parse-time tls utf7 netrc nnagent nnml
gnus-agent gnus-srvr gnus-score score-mode nnvirtual gnus-msg gnus-art
mm-uu mml2015 epg-config mm-view mml-smime smime dig mailcap nntp
gnus-cache nnir gnus-sum nnoo gnus-group gnus-undo nnmail mail-source
server gnus-start gnus-spec gnus-int gnus-range message format-spec
rfc822 mml mml-sec mm-decode mm-bodies mm-encode mail-parse rfc2231
rfc2047 rfc2045 ietf-drums mailabbrev gmm-utils mailheader gnus-win gnus
gnus-ems nnheader mail-utils wid-edit noutline outline easy-mmode
flyspell ispell eldoc checkdoc regexp-opt thingatpt help-mode view
prog-mode load-dir electric url-handlers url-parse auth-source warnings
eieio byte-opt bytecomp byte-compile cconv macroexp assoc gnus-util
password-cache url-vars mm-util mail-prsvr reveal autoinsert uniquify
advice help-fns advice-preload time-date savehist minibuf-eldef
disp-table cl cl-loaddefs all-autoloads company-autoloads
debbugs-autoloads epoch-view-autoloads js2-mode-autoloads
load-dir-autoloads markchars-autoloads muse-autoloads info easymenu
rainbow-mode-autoloads sisu-mode-autoloads uni-confusables-autoloads
package tabulated-list proof-site proof-autoloads pg-vars bbdb-autoloads
agda2 tooltip ediff-hook vc-hooks lisp-float-type mwheel x-win x-dnd
tool-bar dnd fontset image fringe lisp-mode register page newcomment
menu-bar rfn-eshadow timer select scroll-bar mouse jit-lock font-lock
syntax font-core frame cham georgian utf-8-lang misc-lang vietnamese
tibetan thai tai-viet lao korean japanese hebrew greek romanian slovak
czech european ethiopic indian cyrillic chinese case-table epa-hook
jka-cmpr-hook help simple abbrev minibuffer loaddefs button faces
cus-face files text-properties overlay sha1 md5 base64 format env
code-pages mule custom widget hashtable-print-readable backquote
make-network-process dbusbind dynamic-setting system-font-setting
font-render-setting x-toolkit x multi-tty emacs)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]