From: Jan Djärv <jan.h.d@swipnet.se>
Date: Thu, 5 Feb 2004 11:46:57 +0000 (+0000)
Subject: * x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning
X-Git-Tag: ttn-vms-21-2-B4~7738
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=14ca885408a6fcf5191d5e7869b2726c91081a71;p=emacs.git

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 625c6aad812..0bb4307abf6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-05  Jan Dj,Ad(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 18fcb62d6bf..ad55e3cbd34 100644
--- 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