* x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 625c6aad812e465170e476f53f9b1745819a5e7b..0bb4307abf62afaed56393d340886aaa44c9f6ad 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-05  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
+
+       * x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning
+
 2004-02-04  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * progmodes/cperl-mode.el (cperl-fill-paragraph): Call fill-paragraph

diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el
index 18fcb62d6bf9c6c88c5a46cdb5b852db50364d3e..ad55e3cbd34a93fbc62c14c98555d1108064a35a 100644 (file)
--- a/lisp/x-dnd.el
+++ b/lisp/x-dnd.el
@@ -289,8 +289,7 @@ Return nil if URI is not a local file."
   (let ((f (cond ((string-match "^file:///" uri)       ; XDND format.
                  (substring uri (1- (match-end 0))))
                 ((string-match "^file:" uri)           ; Old KDE, Motif, Sun
-                 (substring uri (match-end 0)))
-                nil)))
+                 (substring uri (match-end 0))))))
     (when (and f must-exist)
       (let* ((decoded-f (decode-coding-string 
                         f