Also require comint when loading.

[bpt/emacs.git] / lisp / dnd.el

diff --git a/lisp/dnd.el b/lisp/dnd.el
index 3b16489..3be1402 100644 (file)
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -1,6 +1,6 @@
 ;;; dnd.el --- drag and drop support.
 
-;; Copyright (C) 2005, 2006 Free Software Foundation, Inc.
+;; Copyright (C) 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
 
 ;; Author: Jan Dj\e,Ad\e(Brv <jan.h.d@swipnet.se>
 ;; Maintainer: FSF
@@ -10,7 +10,7 @@
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 2, or (at your option)
+;; the Free Software Foundation; either version 3, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -146,12 +146,12 @@ Return nil if URI is not a local file."
                  (substring uri (match-end 0))))))
     (when (and f must-exist)
       (setq f (replace-regexp-in-string
-              "%[A-Z0-9][A-Z0-9]"
+              "%[A-Fa-f0-9][A-Fa-f0-9]"
               (lambda (arg)
                 (let ((str (make-string 1 0)))
                   (aset str 0 (string-to-number (substring arg 1) 16))
                   str))
-              f nil t))
+              f t t))
       (let* ((decoded-f (decode-coding-string
                         f
                         (or file-name-coding-system