Commit 0013b70f authored by Chong Yidong's avatar Chong Yidong

* simple.el (set-mark): Revert last change.

parent 9af167bc
2009-07-18 David De La Harpe Golden <david@harpegolden.net>
* simple.el (set-mark): Revert last change.
2009-07-17 Tassilo Horn <tassilo@member.fsf.org>
* doc-view.el (doc-view-initiate-display): Add yes-or-no-p if
......
......@@ -3534,12 +3534,8 @@ store it in a Lisp variable. Example:
(progn
(setq mark-active t)
(run-hooks 'activate-mark-hook)
(and select-active-regions
;; Only set the selection if we already own PRIMARY. The
;; initial selection grab happens in `activate-mark', but
;; it is necessary to update it here.
(x-selection-owner-p 'PRIMARY)
(x-set-selection 'PRIMARY (current-buffer)))
(when select-active-regions
(x-set-selection 'PRIMARY (current-buffer)))
(set-marker (mark-marker) pos (current-buffer)))
;; Normally we never clear mark-active except in Transient Mark mode.
;; But when we actually clear out the mark value too, we must
......
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