Remove directory part from filenames in function declarations.

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 68b32ef422465915d1c9b7e2ded5a6619b967858..9d86733ab98ab1ec215fd0a31b87796ff4bdebb3 100644 (file)
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,8 @@
+2007-12-06  Glenn Morris  <rgm@gnu.org>
+
+       * url-file.el, url-mailto.el: Remove directory part from filenames
+       in function declarations.
+
 2007-12-02  Glenn Morris  <rgm@gnu.org>
 
        * url-about.el, url-handlers.el: Don't require cl when compiling.

diff --git a/lisp/url/url-file.el b/lisp/url/url-file.el
index cedf98a3ad39af14fcb4a86e041466c964e6781d..f9c9cd33d0488953e3ad2541927dbbb3b788ee40 100644 (file)
--- a/lisp/url/url-file.el
+++ b/lisp/url/url-file.el
@@ -86,8 +86,8 @@ to them."
            (error nil)))
       (apply func args))))
 
-(declare-function ange-ftp-set-passwd "../net/ange-ftp" (host user passwd))
-(declare-function ange-ftp-copy-file-internal "../net/ange-ftp"
+(declare-function ange-ftp-set-passwd "ange-ftp" (host user passwd))
+(declare-function ange-ftp-copy-file-internal "ange-ftp"
                  (filename newname ok-if-already-exists
                            keep-date &optional msg cont nowait))
 (declare-function url-generate-unique-filename "url-util" (&optional fmt))

diff --git a/lisp/url/url-mailto.el b/lisp/url/url-mailto.el
index 5004c62415c358e36c016bed715f45a39650804e..160c6db98d711efc3fc90e195a4bc750a15d2ba4 100644 (file)
--- a/lisp/url/url-mailto.el
+++ b/lisp/url/url-mailto.el
@@ -60,7 +60,7 @@
        (save-excursion
          (insert "\n"))))))
 
-(declare-function mail-send-and-exit "../mail/sendmail")
+(declare-function mail-send-and-exit "sendmail")
 
 ;;;###autoload
 (defun url-mailto (url)