Mercurial > emacs
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." |