Commit 3ad0e7ce authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(mouse-drag-region): Delete redundant switch-frame clause.

(mouse-drag-secondary): Likewise.
parent 5330e99c
......@@ -228,10 +228,6 @@ release the mouse button. Otherwise, it does not."
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 @@ This must be bound to a button-down mouse event."
(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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment