Mercurial > hg > xemacs-beta

comparison lisp/loaddefs.el @ 428:3ecd8885ac67 r21-2-22

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-22
author cvs
date Mon, 13 Aug 2007 11:28:15 +0200
parents
children abe6d1db359e
comparison
equal deleted inserted replaced
427:0a0253eac470 428:3ecd8885ac67
1 ;;; loaddefs.el --- define standard autoloads of other files
2
3 ;; Copyright (C) 1985-7, 1992-5, 1997 Free Software Foundation, Inc.
4
5 ;; Maintainer: XEmacs Development Team
6 ;; Keywords: internal
7
8 ;; This file is part of XEmacs.
9
10 ;; XEmacs is free software; you can redistribute it and/or modify it
11 ;; under the terms of the GNU General Public License as published by
12 ;; the Free Software Foundation; either version 2, or (at your option)
13 ;; any later version.
14
15 ;; XEmacs is distributed in the hope that it will be useful, but
16 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 ;; General Public License for more details.
19
20 ;; You should have received a copy of the GNU General Public License
21 ;; along with XEmacs; see the file COPYING. If not, write to the
22 ;; Free Software Foundation, 59 Temple Place - Suite 330,
23 ;; Boston, MA 02111-1307, USA.
24
25 ;;; Synched up with: Not synched with FSF.
26
27 ;;; Commentary:
28
29 ;; The following commentary is completely out of date. I would like to
30 ;; delete it, but it serves as a useful reminder as to how things used to
31 ;; work.
32
33 ;; !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
34 ;; Special formatting conventions are used in this file!
35
36 ;; a backslash-newline is used at the beginning of a documentation string
37 ;; when that string should be stored in the file lib-src/DOCnnn, not in core.
38
39 ;; Such strings read into Lisp as numbers (during the pure-loading phase).
40
41 ;; But you must obey certain rules to make sure the string is understood
42 ;; and goes into lib-src/DOCnnn properly. Otherwise, the string will not go
43 ;; anywhere!
44
45 ;; The doc string must appear in the standard place in a call to
46 ;; defun, autoload, defvar or defconst. No Lisp macros are recognized.
47 ;; The open-paren starting the definition must appear in column 0.
48
49 ;; In defvar and defconst, there is an additional rule:
50 ;; The double-quote that starts the string must be on the same
51 ;; line as the defvar or defconst.
52 ;; !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
53
54 ;; **********************************************************************
55 ;; You should never need to write autoloads by hand and put them here.
56
57 ;; It is no longer necessary. Instead use autoload.el to maintain them
58 ;; for you. Just insert ";;;###autoload" before defuns or defmacros you
59 ;; want to be autoloaded, or other forms you want copied into loaddefs.el
60 ;; (defvars, key definitions, etc.). For example,
61 ;; ;;;###autoload
62 ;; (defun foobar () ....)
63 ;; ;;;###autoload (define-key global-map "f" 'foobar)
64 ;; ;;;###autoload
65 ;; (defvar foobar-var nil "\
66 ;; This is foobar-var's doc-string.")
67
68 ;; Then do M-x update-file-autoloads on the file to update loaddefs.el.
69
70 ;; You can also use M-x update-directory-autoloads to update the autoloads
71 ;; in loaddefs.el for all .el files in the lisp/ directory, or M-x
72 ;; update-autoloads-here to update the autoloads for each file that
73 ;; already has an autoload section in this file.
74 ;; **********************************************************************
75
76
77 ;;; Code:
78
79 ;; These variables are used by autoloadable packages.
80 ;; They are defined here so that they do not get overridden
81 ;; by the loading of those packages.
82
83
84 ;; Names in directory that end in one of these
85 ;; are ignored in completion,
86 ;; making it more likely you will get a unique match.
87 (setq completion-ignored-extensions
88 (mapcar 'purecopy
89 '(".o" ".elc" "~" ".bin" ".lbin" ".fasl"
90 ".dvi" ".toc" ".log" ".aux" ".a" ".ln"
91 ".lof" ".blg" ".bbl" ".glo" ".idx" ".lot" ".fmt"
92 ".diff" ".oi" ".class")))
93
94
95 ;; This needs to be redone better. -slb
96 ;(setq debug-ignored-errors
97 ; '(beginning-of-line
98 ; beginning-of-buffer
99 ; end-of-line
100 ; end-of-buffer
101 ; end-of-file buffer-read-only
102 ; "\\`Previous command was not a yank\\'"
103 ; "\\`Minibuffer is not active for completion\\'"
104 ; "\\`No \\(following\\|preceding\\) item in .*-history\\'"
105 ; "\\`No recursive edit is in progress\\'"
106 ; "\\`Changes to be undone are outside visible portion of buffer\\'"
107 ; "\\`No further undo information\\'"
108 ; "\\`No undo information in this buffer\\'"
109 ; "\\`Buffer modified since last undo/redo, cannot redo"
110 ; "\\`Save not confirmed\\'"
111 ; "\\`Canceled\\'"
112 ; "\\`\\(Revert\\|Steal\\|Recover-file\\) cancelled\\.\\'"
113
114 ; ;; comint
115 ; "\\`Not at command line\\'"
116 ; "\\`Empty input ring\\'"
117 ; "\\`No history\\'"
118 ; "\\`Not found\\'" ;; To common?
119 ; "\\`Current buffer has no process\\'"
120
121 ; ;; dabbrev
122 ; "\\`No \\(further \\)?dynamic expansion for .* found\\.?\\'"
123
124 ; ;; Completion
125 ; "\\`To complete, the point must be after a symbol at least [0-9]* character long\\.\\'"
126 ; "\\`The string \".*\" is too short to be saved as a completion\\.\\'"
127
128 ; ;; Compile
129 ; "\\`No more errors\\( yet\\|\\)\\'"
130
131 ; ;; Gnus
132 ; ;"\\`NNTP: Connection closed\\.\\'"
133
134 ; ;; info
135 ; "\\`Node has no Previous\\'"
136 ; "\\`No \".*\" in index\\'"
137
138 ; ;; imenu
139 ; ;"\\`No items suitable for an index found in this buffer\\.\\'"
140 ; ;"\\`The mode \".*\" does not take full advantage of imenu\\.el yet\\.\\'"
141
142 ; ;; ispell
143 ; "\\`No word found to check!\\'"
144
145 ; ;; man
146 ; "\\`.* not found\\'"
147 ; "\\`No more history\\.\\'"
148
149 ; ;; etags
150 ; "\\`File .* is not a valid tag table\\'"
151 ; "\\`File .* is not a valid tags file\\'"
152 ; "\\`All files processed\\.\\'"
153 ; "No TAGS file name supplied\\'"
154 ; "\\`Nothing to complete\\'"
155
156 ; ;; BBDB
157 ; "\\`no previous record\\'"
158 ; "\\`no next record\\'"))
159
160 (make-variable-buffer-local 'indent-tabs-mode)
161
162
163 ;;; Load in generated autoloads (made by autoload.el).
164
165 ;; (let ((dir load-path)
166 ;; purify-flag)
167 ;; (while dir
168 ;; (condition-case nil
169 ;; (load (concat (car dir) "auto-autoloads"))
170 ;; (t nil))
171 ;; (pop dir)))
172
173 ;;; Local Variables:
174 ;;; no-byte-compile: t
175 ;;; no-update-autoloads: t
176 ;;; End:
177 ;;; loaddefs.el ends here