From 2c52d7a3b2fcbd32259bf4ca896b0813e5fc844f Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Thu, 6 Dec 2007 04:05:51 +0000
Subject: [PATCH] Remove directory part from filenames in function
 declarations.

---
 lisp/add-log.el             |  4 ++--
 lisp/emacs-lisp/bytecomp.el |  2 +-
 lisp/emacs-lisp/gulp.el     |  4 ++--
 lisp/font-lock.el           | 12 ++++++------
 lisp/help-fns.el            |  2 +-
 lisp/ido.el                 |  2 +-
 lisp/informat.el            |  2 +-
 7 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 89aeafc75d6..33ecd98ec44 100644
--- 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 4ef32a244eb..eaff1ad72f5 100644
--- 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 a75b52d99bd..5ff2b8f564c 100644
--- 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 7e1fff79772..dc350ce146b 100644
--- 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 0643b85672c..5aa8860ae9d 100644
--- 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 2a327439078..4658a887716 100644
--- 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 747d57c4f38..05be680bfa8 100644
--- 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)
-- 
2.39.2