[h-e-w] Re: split-window-recent

[Klaus Berndl]

On Fri, 16 May 2003, Nascif Abousalh-Neto wrote:

>  
>  
>  Hi all,         I use the following command bound to C-x 2 (according to my
>  notes the code was created by Colin Walters, thanks!)
>  
>  (defun split-window-recent ()
>    "Split the current window, and show the next most recently used
>  buffer in the newly created window."
>    (interactive)
>    (split-window)
>    (let ((nextbuf (caddr (buffer-list))))
>      (when nextbuf
>        (show-buffer (next-window (selected-window))
>                     nextbuf))))
>  
>  It is quite nice 90% of the time, but every now and then it selects the
>  minibuffer buffer into the new window - which is clearly an annoyance. I
>  would like to test if the "nextbuf" buffer is the minibuffer, but there
>  seems to be no "minibuffer-p" or equivalent test predicate (on GNU Emacs
>  21.2).
>  
>  Any ideas?

(message "nextbuf is%s a minibuffer"
         (if (equal nextbuf (window-buffer (minibuffer-window)))
             ""
           " not"))
  
Does this help?
Klaus

  
>  TIA,
>          Nascif
-- 
Klaus Berndl                    mailto: address@hidden
sd&m AG                         http://www.sdm.de
software design & management    
Thomas-Dehler-Str. 27, 81737 München, Germany
Tel +49 89 63812-392, Fax -220