Mercurial > emacs
changeset 83040:b0da1c792c48
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
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Thu, 19 Feb 2004 02:10:05 +0000 |
parents | e3c68dad44a0 |
children | 94b1d2cd8189 |
files | lisp/x-dnd.el |
diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- 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."