Commit 1cc8a3f4 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(mouse-set-region): Call set-mark to activate mark.

parent 20f3a745
......@@ -111,6 +111,7 @@ This must be bound to a mouse drag event."
(eq (framep (selected-frame)) 'x))
(sit-for 1))
(push-mark)
(set-mark (point))
(if (numberp (posn-point end))
(goto-char (posn-point end)))))
......
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