From 40234eaf656ec432af0569a814cf1b0c398d13d8 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 6 Dec 2007 04:03:32 +0000 Subject: [PATCH] Remove directory part from filenames in function declarations. --- lisp/url/ChangeLog | 5 +++++ lisp/url/url-file.el | 4 ++-- lisp/url/url-mailto.el | 2 +- 3 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 68b32ef4224..9d86733ab98 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,3 +1,8 @@ +2007-12-06 Glenn Morris + + * url-file.el, url-mailto.el: Remove directory part from filenames + in function declarations. + 2007-12-02 Glenn Morris * 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 cedf98a3ad3..f9c9cd33d04 100644 --- 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 5004c62415c..160c6db98d7 100644 --- 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) -- 2.39.2