(calculator-expt): Modify previous change to just use the expanded cl

[gnu-emacs] / lisp / dnd.el

diff --git a/lisp/dnd.el b/lisp/dnd.el
index 56a619490aacad0fc657218f1de3fdeb5b9a663b..3be1402f9e5a7e64efa4142d28ff61766dd8f4c8 100644 (file)
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -1,6 +1,6 @@
 ;;; dnd.el --- drag and drop support.
 
-;; Copyright (C) 2005, 2006, 2007 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,
@@ -151,7 +151,7 @@ Return nil if URI is not a local file."
                 (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