Function: cua-cut-to-global-mark

cua-cut-to-global-mark is an interactive and byte-compiled function defined in cua-gmrk.el.gz.

Signature

(cua-cut-to-global-mark)

Documentation

Move active region/rectangle to global mark buffer/position.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/cua-gmrk.el.gz
(defun cua-cut-to-global-mark ()
  "Move active region/rectangle to global mark buffer/position."
  (interactive)
  (if buffer-read-only
      (cua-copy-to-global-mark)
    (setq cua--last-killed-rectangle nil)
    (if cua--rectangle
	(cua--cut-rectangle-to-global-mark nil)
      (let ((start (mark)) (end (point)))
	(or (<= start end)
	    (setq start (prog1 end (setq end start))))
	(cua-cut-region-to-global-mark start end)))))