# HG changeset patch
# User Karoly Lorentey <lorentey@elte.hu>
# Date 1077156605 0
# Node ID b0da1c792c4809fe5c83f46b783cb08d12fd0615
# Parent  e3c68dad44a0d46ff7ed1e2d9f3f5d68396cab9d
Don't try to init X drag and drop on a termcap frame.

lisp/x-dnd.el (x-dnd-init-frame): Don't do anything if the frame is
not an X frame.

git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-80

diff -r e3c68dad44a0 -r b0da1c792c48 lisp/x-dnd.el
--- a/lisp/x-dnd.el	Thu Feb 19 02:06:18 2004 +0000
+++ b/lisp/x-dnd.el	Thu Feb 19 02:10:05 2004 +0000
@@ -142,8 +142,9 @@
 
 (defun x-dnd-init-frame (&optional frame)
   "Setup drag and drop for FRAME (i.e. create appropriate properties)."
-  (x-dnd-init-xdnd-for-frame frame)
-  (x-dnd-init-motif-for-frame frame))
+  (when (eq 'x (window-system frame))
+    (x-dnd-init-xdnd-for-frame frame)
+    (x-dnd-init-motif-for-frame frame)))
 
 (defun x-dnd-get-state-cons-for-frame (frame-or-window)
   "Return the entry in x-dnd-current-state for a frame or window."