Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!tut.cis.ohio-state.edu!EDDIE.MIT.EDU!compass!worley
From: compass!worley@EDDIE.MIT.EDU (Dale Worley)
Newsgroups: gnu.emacs
Subject: Patch to perform-operation-in-other-window
Message-ID: <8906261847.AA13718@galaxy.compass.com>
Date: 26 Jun 89 18:47:55 GMT
Sender: daemon@tut.cis.ohio-state.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 17

In my previous posting, I forgot that if there is only one window,
then other-window doesn't do anything.  Thus, I've added code to split
the current window if there is only one, before switching to the other
window.

     (setq unread-command-char first-key)
     (let ((key-sequence (read-key-sequence nil)))
>      (if (eq (selected-window) (next-window (selected-window)))
>	  (split-window-vertically))
       (other-window 1)
       (setq prefix-arg prefix)
       (call-interactively (key-binding key-sequence)))))

Dale
--
Dale Worley, Compass, Inc.                      worley@compass.com
The War on Drugs -- Prohibition for the '80s.