/[emacs]/emacs/lisp/emacs-lisp/autoload.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/autoload.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.95 by lektu, Tue Feb 4 12:53:34 2003 UTC revision 1.96 by rms, Sun May 4 13:08:49 2003 UTC
# Line 1  Line 1 
1  ;;; autoload.el --- maintain autoloads in loaddefs.el  ;; autoload.el --- maintain autoloads in loaddefs.el
2    
3  ;; Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 2001  ;; Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 2001
4  ;;   Free Software Foundation, Inc.  ;;   Free Software Foundation, Inc.
# Line 475  Autoload section for %s is up to date." Line 475  Autoload section for %s is up to date."
475    (delete-region begin (point)))    (delete-region begin (point)))
476    
477  ;;;###autoload  ;;;###autoload
478  (defun update-autoloads-from-directories (&rest dirs)  (defun update-directory-autoloads (&rest dirs)
479    "\    "\
480  Update loaddefs.el with all the current autoloads from DIRS, and no old ones.  Update loaddefs.el with all the current autoloads from DIRS, and no old ones.
481  This uses `update-file-autoloads' (which see) do its work."  This uses `update-file-autoloads' (which see) do its work.
482    In an interactive call, you must give one argument, the name
483    of a single directory.  In a call from Lisp, you can supply multiple
484    directories as separate arguments, but this usage is discouraged.
485    
486    The function does NOT recursively descend into subdirectories of the
487    directory or directories specified."
488    (interactive "DUpdate autoloads from directory: ")    (interactive "DUpdate autoloads from directory: ")
489    (let* ((files-re (let ((tmp nil))    (let* ((files-re (let ((tmp nil))
490                       (dolist (suf load-suffixes                       (dolist (suf load-suffixes

Legend:
Removed from v.1.95  
changed lines
  Added in v.1.96

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26