changeset 8255:120d62d58330

(mouse-drag-region): Delete redundant switch-frame clause. (mouse-drag-secondary): Likewise.
author Richard M. Stallman <rms@gnu.org>
date Fri, 15 Jul 1994 21:32:01 +0000
parents 694c4686b446
children da75bd851e9f
files lisp/mouse.el
diffstat 1 files changed, 0 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mouse.el	Fri Jul 15 07:48:35 1994 +0000
+++ b/lisp/mouse.el	Fri Jul 15 21:32:01 1994 +0000
@@ -228,10 +228,6 @@
 		  end-point (posn-point end))
 
 	    (cond
-
-	     ;; Ignore switch-frame events.
-	     ((eq (car-safe event) 'switch-frame))
-
 	     ;; Are we moving within the original window?
 	     ((and (eq (posn-window end) start-window)
 		   (integer-or-marker-p end-point))
@@ -622,10 +618,6 @@
 	      (setq end (event-end event)
 		    end-point (posn-point end))
 	      (cond
-
-	       ;; Ignore switch-frame events.
-	       ((eq (car-safe event) 'switch-frame))
-
 	       ;; Are we moving within the original window?
 	       ((and (eq (posn-window end) start-window)
 		     (integer-or-marker-p end-point))