[Emacs-diffs] Changes to emacs/lisp/window.el

[Pavel Janík]

Index: emacs/lisp/window.el
diff -c emacs/lisp/window.el:1.84 emacs/lisp/window.el:1.85
*** emacs/lisp/window.el:1.84   Sun Feb  3 11:20:52 2002
--- emacs/lisp/window.el        Mon Apr  1 08:38:34 2002
***************
*** 578,583 ****
--- 578,591 ----
      (and window (not window-handled) (not window-solitary)
         (delete-window window))))
  
+ (defun handle-select-window (event)
+   "Handle select-window events."
+   (interactive "e")
+   (let ((window (posn-window (event-start event))))
+     (if (or (not (window-minibuffer-p window))
+           (minibuffer-window-active-p window))
+       (select-window window))))
+ 
  (define-key ctl-x-map "2" 'split-window-vertically)
  (define-key ctl-x-map "3" 'split-window-horizontally)
  (define-key ctl-x-map "}" 'enlarge-window-horizontally)