3.4. exchange-point-and-mark

直前の編集ポイントと現在のポイントとを行き来する設定

my:exchange-point-and-mark は、直前の編集ポイントと現在のポイントとを行き来できる設定です。

(defun my:exchange-point-and-mark ()
  "No mark active `exchange-point-and-mark'."
  (interactive)
  (exchange-point-and-mark)
  (deactivate-mark))		 
(bind-key "C-x C-x" 'my:exchange-point-and-mark)