Commit 2c0f8564 authored by Glenn Morris's avatar Glenn Morris
Browse files

(top-level): Move provide to end.

Don't require cua-gmrk when compiling.
(cua--cut-rectangle-to-global-mark)
(cua--copy-rectangle-to-global-mark): Declare as functions.
parent 88a25b18
......@@ -33,12 +33,8 @@
;;; Code:
(provide 'cua-rect)
(eval-when-compile
(require 'cua-base)
(require 'cua-gmrk)
)
(require 'cua-base))
;;; Rectangle support
......@@ -1061,6 +1057,9 @@ The text previously in the rectangle is overwritten by the blanks."
;; (setq cua-save-point (point))
))))
(declare-function cua--cut-rectangle-to-global-mark "cua-gmrk" (as-text))
(declare-function cua--copy-rectangle-to-global-mark "cua-gmrk" (as-text))
(defun cua-copy-rectangle-as-text (&optional arg delete)
"Copy rectangle, but store as normal text."
(interactive "P")
......@@ -1491,5 +1490,7 @@ With prefix arg, indent to that column."
(setq cua--rectangle-initialized t))
(provide 'cua-rect)
;;; arch-tag: b730df53-17b9-4a89-bd63-4a71ec196731
;;; cua-rect.el ends here
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