* progmodes/python.el (info-lookup-maybe-add-help):

* progmodes/ps-mode.el (doc-view-minor-mode):
* mail/emacsbug.el (Info-menu, Info-goto-node):
* emulation/viper-keym.el (viper-ex)
(viper-normalize-minor-mode-map-alist, viper-set-mode-vars-for):
* emulation/viper-cmd.el (widget-type, widget-button-press)
(viper-set-hooks):
* emacs-lisp/tcover-unsafep.el (unsafep-function):
* emacs-lisp/tcover-ses.el (ses-set-curcell, ses-update-cells)
(ses-load, ses-vector-delete, ses-create-header-string)
(ses-read-cell, ses-read-symbol, ses-command-hook, ses-jump):
* emacs-lisp/gulp.el (mail-subject, mail-send): Declare as
functions.

* url-mailto.el (mail-send-and-exit):
* url-http.el (url-dav-file-attributes):
* url-file.el (ange-ftp-set-passwd, ange-ftp-copy-file-internal):
(url-generate-unique-filename): Declare as functions.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1b3c8eb1c3244003ec1558fc68a2a6570c12d14b..2ee6983cb532ec9725c2191d9e0ad4ac8e957c73 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,19 @@
+2007-11-20  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * progmodes/python.el (info-lookup-maybe-add-help):
+       * progmodes/ps-mode.el (doc-view-minor-mode):
+       * mail/emacsbug.el (Info-menu, Info-goto-node):
+       * emulation/viper-keym.el (viper-ex)
+       (viper-normalize-minor-mode-map-alist, viper-set-mode-vars-for):
+       * emulation/viper-cmd.el (widget-type, widget-button-press)
+       (viper-set-hooks):
+       * emacs-lisp/tcover-unsafep.el (unsafep-function):
+       * emacs-lisp/tcover-ses.el (ses-set-curcell, ses-update-cells)
+       (ses-load, ses-vector-delete, ses-create-header-string)
+       (ses-read-cell, ses-read-symbol, ses-command-hook, ses-jump):
+       * emacs-lisp/gulp.el (mail-subject, mail-send): Declare as
+       functions.
+
 2007-11-20  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * pcvs.el (cvs-revert-if-needed): Fix copy&paste typo.

diff --git a/lisp/emacs-lisp/gulp.el b/lisp/emacs-lisp/gulp.el
index 9e0795c88220c26d6155d46fc481eabcf0b44e92..a75b52d99bd1d7027a24087e57a74a5065b62526 100644 (file)
--- a/lisp/emacs-lisp/gulp.el
+++ b/lisp/emacs-lisp/gulp.el
@@ -78,6 +78,9 @@ Thanks.")
   :type 'string
   :group 'gulp)
 
+(declare-function mail-subject "../mail/sendmail" ())
+(declare-function mail-send "../mail/sendmail" ())
+
 (defun gulp-send-requests (dir &optional time)
   "Send requests for updates to the authors of Lisp packages in directory DIR.
 For each maintainer, the message consists of `gulp-request-header',

diff --git a/lisp/emacs-lisp/tcover-ses.el b/lisp/emacs-lisp/tcover-ses.el
index 27ddeb2571848b4d319c865baac035d589c8c1c4..0a4bdce0412a789c0952df1a0de8c0ccdbbab01a 100644 (file)
--- a/lisp/emacs-lisp/tcover-ses.el
+++ b/lisp/emacs-lisp/tcover-ses.el
@@ -26,6 +26,17 @@
 (defvar ses-initial-global-parameters)
 (defvar ses-mode-map)
 
+(declare-function ses-set-curcell "../ses")
+(declare-function ses-update-cells "../ses")
+(declare-function ses-load "../ses")
+(declare-function ses-vector-delete "../ses")
+(declare-function ses-create-header-string "../ses")
+(declare-function ses-read-cell "../ses")
+(declare-function ses-read-symbol "../ses")
+(declare-function ses-command-hook "../ses")
+(declare-function ses-jump "../ses")
+
+
 ;;;Here are some macros that exercise SES.  Set `pause' to t if you want the
 ;;;macros to pause after each step.
 (let* ((pause nil)

diff --git a/lisp/emacs-lisp/tcover-unsafep.el b/lisp/emacs-lisp/tcover-unsafep.el
index b999ce63b8cc0c019990802e33f448cf56c21f47..42c3ebef4e738acfeb64b74fda584d6afe7cd8f4 100644 (file)
--- a/lisp/emacs-lisp/tcover-unsafep.el
+++ b/lisp/emacs-lisp/tcover-unsafep.el
@@ -111,6 +111,7 @@
     )
   "A-list of (FORM . REASON)... that`unsafep' should decide are unsafe.")
 
+(declare-function unsafep-function "unsafep" (fun))
 
 ;;;#########################################################################
 (defun testcover-unsafep ()

diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el
index 5e13edb949587a418e6a7b47b8ef7005d0953ff1..c90cecf8adc96b8ea859bbe0adb0ec898e8f53b6 100644 (file)
--- a/lisp/emulation/viper-cmd.el
+++ b/lisp/emulation/viper-cmd.el
@@ -3097,6 +3097,9 @@ On reaching beginning of line, stop and signal error."
     (setq this-command 'next-line)
     (if com (viper-execute-com 'viper-next-line val com))))
 
+(declare-function widget-type "../widget" (widget))
+(declare-function widget-button-press "../widget" (pos &optional event))
+(declare-function viper-set-hooks "viper" ())
 
 (defun viper-next-line-at-bol (arg)
   "Next line at beginning of line.

diff --git a/lisp/emulation/viper-keym.el b/lisp/emulation/viper-keym.el
index 0e502720f5e7b3726c70d7d728630d8b0772ff05..ade63b1071c11f6605eac88be517e09d9054a8af 100644 (file)
--- a/lisp/emulation/viper-keym.el
+++ b/lisp/emulation/viper-keym.el
@@ -48,6 +48,9 @@
 
 (require 'viper-util)
 
+(declare-function viper-ex "viper-ex" (arg &optional string))
+(declare-function viper-normalize-minor-mode-map-alist "viper-cmd" ())
+(declare-function viper-set-mode-vars-for "viper-cmd" (state))
 
 ;;; Variables
 

diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index e725a8affb0c6b761c9982b2bb6fc2193f934463..eb96ef07612ebd42724f498f37d220d0f8df338f 100644 (file)
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -229,6 +229,9 @@ Type SPC to scroll through this section and its subsections."))))
       (setq report-emacs-bug-orig-text (buffer-substring (point-min) (point))))
     (goto-char user-point)))
 
+(declare-function Info-menu "info" (menu-item &optional fork))
+(declare-function Info-goto-node "info" (nodename &optional fork))
+
 (defun report-emacs-bug-info ()
   "Go to the Info node on reporting Emacs bugs."
   (interactive)

diff --git a/lisp/progmodes/ps-mode.el b/lisp/progmodes/ps-mode.el
index c131575f57c3f19a7fd3f59bc4c6f76d2768213b..8b26db1a12e6eb29e566a710dcb5cbbd7aaf07db 100644 (file)
--- a/lisp/progmodes/ps-mode.el
+++ b/lisp/progmodes/ps-mode.el
@@ -480,6 +480,9 @@ If nil, the following are tried in turn, until success:
       (setq i (1+ i)))))
 
 \f
+
+(declare-function doc-view-minor-mode "../doc-view")
+
 ;; PostScript mode.
 
 ;;;###autoload

diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index f54b7c9f9285dfeb357261aedc8d9240e9073efa..4039a4f4a43bdfab1933f6bf2028e902891b924c 100644 (file)
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -1656,6 +1656,8 @@ instance.  Assumes an inferior Python is running."
 \f
 ;;;; Info-look functionality.
 
+(declare-function info-lookup-maybe-add-help "info-look" (&rest arg))
+
 (defun python-after-info-look ()
   "Set up info-look for Python.
 Used with `eval-after-load'."

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 56df401cb53461bbc279f9c50e7bfcd85006d37e..e8ae7233c207f4cbf7b9bd5864c839e9b188633a 100644 (file)
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -3,8 +3,8 @@
        * url-mailto.el (mail-send-and-exit):
        * url-http.el (url-dav-file-attributes):
        * url-file.el (ange-ftp-set-passwd, ange-ftp-copy-file-internal):
-       Declare as functions.
-       
+       (url-generate-unique-filename): Declare as functions.
+
        * url-privacy.el (url-device-type): Define unconditionally.
 
 2007-10-31  Juanma Barranquero  <lekktu@gmail.com>

diff --git a/lisp/url/url-file.el b/lisp/url/url-file.el
index 9faee051f466b2db3919b52a28797c1fd2ea30ef..c39dcc030ac3fbd1a598c0728046260ca4df1f54 100644 (file)
--- a/lisp/url/url-file.el
+++ b/lisp/url/url-file.el
@@ -90,6 +90,7 @@ to them."
 (declare-function ange-ftp-copy-file-internal "../net/ange-ftp"
                  (filename newname ok-if-already-exists
                            keep-date &optional msg cont nowait))
+(declare-function url-generate-unique-filename "url-utile" (&optional fmt))
 
 (defun url-file-build-filename (url)
   (if (not (vectorp url))