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