aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2007-11-22 13:52:35 +0000
committerJuanma Barranquero2007-11-22 13:52:35 +0000
commitcc63039ece20e76162c591b44a4dcc315fc8b564 (patch)
tree0796da552d3902618162b255ab36e6678a8c4983
parent5ba0fd437fe9d8d2b7330728d65927fd9f7c6f70 (diff)
downloademacs-cc63039ece20e76162c591b44a4dcc315fc8b564.tar.gz
emacs-cc63039ece20e76162c591b44a4dcc315fc8b564.zip
(x-register-dnd-atom, x-get-atom-name, x-send-client-message):
Declare as functions.
-rw-r--r--lisp/x-dnd.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el
index f6f3b75dc07..2c36acabef4 100644
--- a/lisp/x-dnd.el
+++ b/lisp/x-dnd.el
@@ -117,7 +117,7 @@ any protocol specific data.")
117 117
118(defvar x-dnd-empty-state [nil nil nil nil nil nil nil]) 118(defvar x-dnd-empty-state [nil nil nil nil nil nil nil])
119 119
120 120(declare-function x-register-dnd-atom "xselect.c")
121 121
122(defun x-dnd-init-frame (&optional frame) 122(defun x-dnd-init-frame (&optional frame)
123 "Setup drag and drop for FRAME (i.e. create appropriate properties)." 123 "Setup drag and drop for FRAME (i.e. create appropriate properties)."
@@ -422,6 +422,9 @@ otherwise return the frame coordinates."
422 (+ frame-real-top (nth 1 edges)))) 422 (+ frame-real-top (nth 1 edges))))
423 (cons frame-real-left frame-real-top)))) 423 (cons frame-real-left frame-real-top))))
424 424
425(declare-function x-get-atom-name "xselect.c")
426(declare-function x-send-client-message "xselect.c")
427
425(defun x-dnd-handle-xdnd (event frame window message format data) 428(defun x-dnd-handle-xdnd (event frame window message format data)
426 "Receive one XDND event (client message) and send the appropriate reply. 429 "Receive one XDND event (client message) and send the appropriate reply.
427EVENT is the client message. FRAME is where the mouse is now. 430EVENT is the client message. FRAME is where the mouse is now.