Re: pop-to-buffer and friends new behavior or bug?

[Thierry Volpiatto]

martin rudalics <address@hidden> writes:

>> The relevant code is in anything.el starting at line 3123 at:
>> ;; (@* "Utility: Persistent Action")
>>
>> and more exactly in `anything-persistent-action-display-buffer'.
>
> I tried to look at anything but it is much too complicated for me.
It is less complicated than display-buffer-alist ;-)

> Besides, evaluating anything-config.el gives the bug
What is evaluating? C-M-x?
Please use load or require.

>  global-set-key: Key sequence <f5> a starts with non-prefix key <f5>

Please follow instruction i gave you in precedent mail, or 
_load_ FIRST anything.el and SECOND anything-config.el.

I have no error here with emacs -Q.

Here a minimal config for anything with emacs -Q:

(add-to-list 'load-path "~/elisp/anything") ; Change path to anything
(require 'anything-config)

> Anyway: In the buggy version what is the value of NOT-THIS-WINDOW in the
> call to `display-buffer' in
> `anything-persistent-action-display-buffer'?
I think it is not called in old code, at least here, maybe it is used in
other libraries.

> And what is the selected window at that time?
It is the window containing the anything-buffer.

You can check with this:
--8<---------------cut here---------------start------------->8---
(defun anything-select-persistent-action-window ()
  (select-window (get-buffer-window (anything-buffer-get)))
  (message "%S" (get-buffer-window (anything-buffer-get)))
  (select-window
   (setq minibuffer-scroll-window
     (anything-persistent-action-display-window)))
   (message "%S" (anything-persistent-action-display-window)))
--8<---------------cut here---------------end--------------->8---


+---------------------------+
|                           |
| anything-current-buffer   |
| (the window to display    |
|  persistent action result)| In this case the result of
+---------------------------+ describe-function.
|                           |
| anything-buffer           |
| (selected window)         |
|                           |
+---------------------------+
| minibuffer                |
+---------------------------+


> The minibuffer window?
no

NOTE:
In fixed version using only:

--8<---------------cut here---------------start------------->8---
(when (boundp 'display-buffer-alist)
  (setq not-this-window '(reuse-window same other nil)))
(display-buffer buf not-this-window)))
--8<---------------cut here---------------end--------------->8---

is enough. (no pop-up-window entry)


--
A+ Thierry
Get my Gnupg key:
gpg --keyserver pgp.mit.edu --recv-keys 59F29997