# HG changeset patch
# User Jan Dj¸«£rv <jan.h.d@swipnet.se>
# Date 1155281559 0
# Node ID 1865f719f2269599815a38352053137459d0dfe4
# Parent  9f8678beb7e37fe420364cd966f98f37362db70f
* x-dnd.el (x-dnd-init-frame): Call x-register-dnd-atom.

diff -r 9f8678beb7e3 -r 1865f719f226 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Aug 11 07:31:14 2006 +0000
+++ b/lisp/ChangeLog	Fri Aug 11 07:32:39 2006 +0000
@@ -1,3 +1,7 @@
+2006-08-11  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
+
+	* x-dnd.el (x-dnd-init-frame): Call x-register-dnd-atom.
+
 2006-08-10  Romain Francoise  <romain@orebokech.com>
 
 	* textmodes/dns-mode.el: Alias `zone-mode' to `dns-mode'.
diff -r 9f8678beb7e3 -r 1865f719f226 lisp/x-dnd.el
--- a/lisp/x-dnd.el	Fri Aug 11 07:31:14 2006 +0000
+++ b/lisp/x-dnd.el	Fri Aug 11 07:32:39 2006 +0000
@@ -121,6 +121,12 @@
 
 (defun x-dnd-init-frame (&optional frame)
   "Setup drag and drop for FRAME (i.e. create appropriate properties)."
+  (x-register-dnd-atom "DndProtocol" frame)
+  (x-register-dnd-atom "_MOTIF_DRAG_AND_DROP_MESSAGE" frame)
+  (x-register-dnd-atom "XdndEnter" frame)
+  (x-register-dnd-atom "XdndPosition" frame)
+  (x-register-dnd-atom "XdndLeave" frame)
+  (x-register-dnd-atom "XdndDrop" frame)
   (x-dnd-init-xdnd-for-frame frame)
   (x-dnd-init-motif-for-frame frame))