From: Jan Djärv <jan.h.d@swipnet.se>
Date: Mon, 11 Apr 2005 19:25:58 +0000 (+0000)
Subject: * term/w32-win.el (dnd): Require dnd
X-Git-Tag: ttn-vms-21-2-B4~1062
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6bc52abcc6f560d0085ebd4d1e1409b2c87e664b;p=emacs.git

* term/w32-win.el (dnd): Require dnd
 (w32-drag-n-drop): Call dnd-handle-one-url.
---

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 69e5c0e793b..862f3fe1d0a 100644
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -76,7 +76,7 @@
 (require 'faces)
 (require 'select)
 (require 'menu-bar)
-(require 'x-dnd)
+(require 'dnd)
 (require 'code-pages)
 
 ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles
@@ -109,8 +109,8 @@ Switch to a buffer editing the last file dropped."
       (if (and (> x 0) (> y 0))
 	  (set-frame-selected-window nil window))
       (mapcar (lambda (file-name) 
-		(x-dnd-handle-one-url window 'private 
-				      (concat "file:" file-name)))
+		(dnd-handle-one-url window 'private 
+				    (concat "file:" file-name)))
 		(car (cdr (cdr event)))))
   (raise-frame)))