comparison lisp/x-dnd.el @ 72356:1865f719f226

* x-dnd.el (x-dnd-init-frame): Call x-register-dnd-atom.
author Jan Djärv <jan.h.d@swipnet.se>
date Fri, 11 Aug 2006 07:32:39 +0000
parents b1742b0066f2
children 030d7ce12631 7f3f771c85fa
comparison
equal deleted inserted replaced
72355:9f8678beb7e3 72356:1865f719f226
119 119
120 120
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)."
124 (x-register-dnd-atom "DndProtocol" frame)
125 (x-register-dnd-atom "_MOTIF_DRAG_AND_DROP_MESSAGE" frame)
126 (x-register-dnd-atom "XdndEnter" frame)
127 (x-register-dnd-atom "XdndPosition" frame)
128 (x-register-dnd-atom "XdndLeave" frame)
129 (x-register-dnd-atom "XdndDrop" frame)
124 (x-dnd-init-xdnd-for-frame frame) 130 (x-dnd-init-xdnd-for-frame frame)
125 (x-dnd-init-motif-for-frame frame)) 131 (x-dnd-init-motif-for-frame frame))
126 132
127 (defun x-dnd-get-state-cons-for-frame (frame-or-window) 133 (defun x-dnd-get-state-cons-for-frame (frame-or-window)
128 "Return the entry in x-dnd-current-state for a frame or window." 134 "Return the entry in x-dnd-current-state for a frame or window."