Mercurial > emacs

comparison lisp/emacs-lisp/autoload.el @ 90072:cb67264d6096

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-2 Merge from emacs--cvs-trunk--0 Patches applied: * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-83 - miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-84 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-3 - miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-4 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-5 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-6 - miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-11 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-12 Remove "-face" suffix from lazy-highlight face name * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-13 - miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-16 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-17 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-18 - miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-21 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-22 <no summary provided> * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-23 - miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-39 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-40 Fix regressions from latest reftex update * miles@gnu.org--gnu-2005/gnus--rel--5.10--base-0 tag of miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-82 * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-1 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-2 Merge from miles@gnu.org--gnu-2004 * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-3 Merge from emacs--cvs-trunk--0
author Miles Bader <miles@gnu.org>
date Sun, 16 Jan 2005 03:40:12 +0000
parents e24e2e78deda 847ceead54c3
children 7a3341d65a12
comparison
equal deleted inserted replaced
90071:f6b4d0ebf147 90072:cb67264d6096
133 ;; the doc-string in FORM. 133 ;; the doc-string in FORM.
134 ;; Those properties are now set in lisp-mode.el. 134 ;; Those properties are now set in lisp-mode.el.
135 135
136 136
137 (defun autoload-trim-file-name (file) 137 (defun autoload-trim-file-name (file)
138 ;; Returns a relative pathname of FILE 138 ;; Returns a relative file path for FILE
139 ;; starting from the directory that loaddefs.el is in. 139 ;; starting from the directory that loaddefs.el is in.
140 ;; That is normally a directory in load-path, 140 ;; That is normally a directory in load-path,
141 ;; which means Emacs will be able to find FILE when it looks. 141 ;; which means Emacs will be able to find FILE when it looks.
142 ;; Any extra directory names here would prevent finding the file. 142 ;; Any extra directory names here would prevent finding the file.
143 (setq file (expand-file-name file)) 143 (setq file (expand-file-name file))
271 (done-any nil) 271 (done-any nil)
272 (visited (get-file-buffer file)) 272 (visited (get-file-buffer file))
273 output-end) 273 output-end)
274 274
275 ;; If the autoload section we create here uses an absolute 275 ;; If the autoload section we create here uses an absolute
276 ;; pathname for FILE in its header, and then Emacs is installed 276 ;; file name for FILE in its header, and then Emacs is installed
277 ;; under a different path on another system, 277 ;; under a different path on another system,
278 ;; `update-autoloads-here' won't be able to find the files to be 278 ;; `update-autoloads-here' won't be able to find the files to be
279 ;; autoloaded. So, if FILE is in the same directory or a 279 ;; autoloaded. So, if FILE is in the same directory or a
280 ;; subdirectory of the current buffer's directory, we'll make it 280 ;; subdirectory of the current buffer's directory, we'll make it
281 ;; relative to the current buffer's directory. 281 ;; relative to the current buffer's directory.