> When this code in `compilation-start' is executed:
 >
 >     (if (buffer-local-value 'compilation-scroll-output outbuf)
 > 	(save-selected-window
 > 	  (select-window outwin)
 > 	  (goto-char (point-max))))
 >
 > outwin is #<window 13 on *compilation*>
 > and after the select-window call (selected-window) is #<window 13
 > on *compilation*>.  However, at this point (current-buffer)
 > returns *test*, rather than *compilation*.

This is a very, very great nuisance of `select-window'.  Would the
attached patch DTRT?

martin