Remove directory part from filenames in function declarations.

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 89aeafc75d6ee9c64f75ade4d9c5a7abf5cb35dd..33ecd98ec44848158ef29ce769e5d8e7748c3d54 100644 (file)
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -826,8 +826,8 @@ Prefix arg means justify as well."
   '(TeX-mode plain-TeX-mode LaTeX-mode tex-mode)
   "*Modes that look like TeX to `add-log-current-defun'.")
 
-(declare-function c-beginning-of-defun "progmodes/cc-cmds" (&optional arg))
-(declare-function c-end-of-defun "progmodes/cc-cmds" (&optional arg))
+(declare-function c-beginning-of-defun "cc-cmds" (&optional arg))
+(declare-function c-end-of-defun "cc-cmds" (&optional arg))
 
 ;;;###autoload
 (defun add-log-current-defun ()

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 4ef32a244ebc8a8780bc9b0776722cbc1f7a07ef..eaff1ad72f53dad2aca4948689b8d1ab8b8ca394 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1054,7 +1054,7 @@ Each function's symbol gets added to `byte-compile-noruntime-functions'."
   nil)
 
 ;; (compile-mode) will cause this to be loaded.
-(declare-function compilation-forget-errors "../progmodes/compile" nil)
+(declare-function compilation-forget-errors "compile" ())
 
 ;; Log the start of a file in *Compile-Log*, and mark it as done.
 ;; Return the position of the start of the page in the log buffer.

diff --git a/lisp/emacs-lisp/gulp.el b/lisp/emacs-lisp/gulp.el
index a75b52d99bd1d7027a24087e57a74a5065b62526..5ff2b8f564cca10380dd2df19a6922222f0219b7 100644 (file)
--- a/lisp/emacs-lisp/gulp.el
+++ b/lisp/emacs-lisp/gulp.el
@@ -78,8 +78,8 @@ Thanks.")
   :type 'string
   :group 'gulp)
 
-(declare-function mail-subject "../mail/sendmail" ())
-(declare-function mail-send "../mail/sendmail" ())
+(declare-function mail-subject "sendmail" ())
+(declare-function mail-send "sendmail" ())
 
 (defun gulp-send-requests (dir &optional time)
   "Send requests for updates to the authors of Lisp packages in directory DIR.

diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 7e1fff7977269e848e2e3bbc3e525e3daf71e870..dc350ce146bf73fcc817a072ac806891dc41afb2 100644 (file)
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -886,12 +886,12 @@ The value of this variable is used when Font Lock mode is turned on."
 (defvar lazy-lock-mode)
 (defvar jit-lock-mode)
 
-(declare-function fast-lock-after-fontify-buffer "obsolete/fast-lock")
-(declare-function fast-lock-after-unfontify-buffer "obsolete/fast-lock")
-(declare-function fast-lock-mode "obsolete/fast-lock")
-(declare-function lazy-lock-after-fontify-buffer "obsolete/lazy-lock")
-(declare-function lazy-lock-after-unfontify-buffer "obsolete/lazy-lock")
-(declare-function lazy-lock-mode "obsolete/lazy-lock")
+(declare-function fast-lock-after-fontify-buffer "fast-lock")
+(declare-function fast-lock-after-unfontify-buffer "fast-lock")
+(declare-function fast-lock-mode "fast-lock")
+(declare-function lazy-lock-after-fontify-buffer "lazy-lock")
+(declare-function lazy-lock-after-unfontify-buffer "lazy-lock")
+(declare-function lazy-lock-mode "lazy-lock")
 
 (defun font-lock-turn-on-thing-lock ()
   (let ((thing-mode (font-lock-value-in-major-mode font-lock-support-mode)))

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 0643b85672ca4564e960079ca2c14528d7b01e6f..5aa8860ae9d25fe6e3f50a110e843f16acfb2b85 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -248,7 +248,7 @@ face (according to `face-differs-from-default-p')."
        src-file
       file-name)))
 
-(declare-function ad-get-advice-info "emacs-lisp/advice" (function))
+(declare-function ad-get-advice-info "advice" (function))
 
 ;;;###autoload
 (defun describe-function-1 (function)

diff --git a/lisp/ido.el b/lisp/ido.el
index 2a32743907853cd871917daf8c733f665ed88b77..4658a8877168a406864b0aea0474a792c08365c7 100644 (file)
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -3365,7 +3365,7 @@ for first matching file."
       (nconc ido-temp-list items)
     (setq ido-temp-list items)))
 
-(declare-function tramp-tramp-file-p "net/tramp" (name))
+(declare-function tramp-tramp-file-p "tramp" (name))
 
 (defun ido-file-name-all-completions-1 (dir)
   (cond

diff --git a/lisp/informat.el b/lisp/informat.el
index 747d57c4f38200f3c0e521e8a39526162ef2d3a6..05be680bfa85571ee0c93106a5c3a57aa7831ae6 100644 (file)
--- a/lisp/informat.el
+++ b/lisp/informat.el
@@ -32,7 +32,7 @@
 
 (require 'info)
 
-(declare-function texinfo-format-refill "textmodes/texinfmt" ())
+(declare-function texinfo-format-refill "texinfmt" ())
 
 ;;;###autoload
 (defun Info-tagify (&optional input-buffer-name)