Use switch-to-buffer-other-window in inferior-tcl?

[Jesper Harder]

In GNU Emacs 21.3.50.43 (i686-pc-linux-gnu, GTK+ Version 2.0.2)
 of 2004-09-15 on defun.localdomain
configured using `configure '--with-gtk''

Hi,

Wouldn't it be nicer if `inferior-tcl' used
`switch-to-buffer-other-window' rather than `switch-to-buffer'?

When I press `C-c C-t' in a TCL file I'd always prefer to keep the
buffer with the code and display the TCL prompt in another window (if
available) rather than displacing the code buffer.

Opinions?


2004-09-20  Jesper Harder  <address@hidden>

        * progmodes/tcl.el (inferior-tcl): Use switch-to-buffer-other-window.


diff -c /home/harder/emacs/lisp/progmodes/tcl.el.\~1.77.\~ 
/home/harder/emacs/lisp/progmodes/tcl.el
*** /home/harder/emacs/lisp/progmodes/tcl.el.~1.77.~    Sat Apr 10 14:39:58 2004
--- /home/harder/emacs/lisp/progmodes/tcl.el    Mon Sep 20 21:29:39 2004
***************
*** 1112,1118 ****
    (make-local-variable 'tcl-application)
    (setq tcl-application cmd)
    (setq inferior-tcl-buffer "*inferior-tcl*")
!   (switch-to-buffer "*inferior-tcl*"))
  
  (defalias 'run-tcl 'inferior-tcl)
  
--- 1112,1118 ----
    (make-local-variable 'tcl-application)
    (setq tcl-application cmd)
    (setq inferior-tcl-buffer "*inferior-tcl*")
!   (switch-to-buffer-other-window "*inferior-tcl*"))
  
  (defalias 'run-tcl 'inferior-tcl)
  

-- 
Jesper Harder                                <http://purl.org/harder/>