Re: split-window-preferred-function

[martin rudalics]

Wouldn't it be nicer to use something like

(or (get-lru-window nil nil)
    ;; Try visible frames first.
    (get-buffer-window (current-buffer) 'visible)
    (get-largest-window 'visible)
    ;; If that didn't work, try iconified frames.
    (get-buffer-window (current-buffer) 0)
    (get-largest-window 0)
    ;; As a last resort, make a new frame.
    (frame-selected-window (funcall pop-up-frame-function)))

at the end of `split-window-preferred-horizontally'?