diff options
| author | Lars Ingebrigtsen | 2019-05-17 04:22:08 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-05-17 04:23:20 +0200 |
| commit | cad2bbbe25fda36f7eb5a81c34070e26743f4ccf (patch) | |
| tree | 6b009fbbe659c01505739789763137ef0fddc971 | |
| parent | 2e8f6ad287acfd4d09f1952d7c45ce7ee68a2474 (diff) | |
| download | emacs-cad2bbbe25fda36f7eb5a81c34070e26743f4ccf.tar.gz emacs-cad2bbbe25fda36f7eb5a81c34070e26743f4ccf.zip | |
Declare rectangle functions in mouse.el to avoid warnings
* lisp/mouse.el (rectangle-dimensions)
(rectangle-position-as-coordinates, rectangle-intersect-p):
Declare these functions from rect.el to avoid compilation warnings.
| -rw-r--r-- | lisp/mouse.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 835eaa32c61..8428c1e0139 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -2402,6 +2402,10 @@ highlight the original region when | |||
| 2402 | `mouse-drag-and-drop-region-show-cursor' is non-nil." | 2402 | `mouse-drag-and-drop-region-show-cursor' is non-nil." |
| 2403 | :version "26.1") | 2403 | :version "26.1") |
| 2404 | 2404 | ||
| 2405 | (declare-function rectangle-dimensions "rect" (start end)) | ||
| 2406 | (declare-function rectangle-position-as-coordinates "rect" (position)) | ||
| 2407 | (declare-function rectangle-intersect-p "rect" (pos1 size1 pos2 size2)) | ||
| 2408 | |||
| 2405 | (defun mouse-drag-and-drop-region (event) | 2409 | (defun mouse-drag-and-drop-region (event) |
| 2406 | "Move text in the region to point where mouse is dragged to. | 2410 | "Move text in the region to point where mouse is dragged to. |
| 2407 | The transportation of text is also referred as `drag and drop'. | 2411 | The transportation of text is also referred as `drag and drop'. |