diff options
| author | Glenn Morris | 2017-11-28 21:16:02 -0500 |
|---|---|---|
| committer | Glenn Morris | 2017-11-28 21:16:02 -0500 |
| commit | 95369ac346d75a7b75bc2c5adf632cc4faa1241a (patch) | |
| tree | 4f5f026a2b82c4716ef600a39a2243f508a6b13d /lisp | |
| parent | c816e647ebf128eccc9df6ce3d64ebc5a5554aec (diff) | |
| download | emacs-95369ac346d75a7b75bc2c5adf632cc4faa1241a.tar.gz emacs-95369ac346d75a7b75bc2c5adf632cc4faa1241a.zip | |
Put most erc autoloads in a dedicated file erc-loaddefs.el
These are features that are only useful after erc.el is loaded.
* lisp/erc/erc.el (top-level): Load erc-loaddefs.
* lisp/erc/erc-autoaway.el, lisp/erc/erc-button.el:
* lisp/erc/erc-capab.el, lisp/erc/erc-compat.el:
* lisp/erc/erc-dcc.el, lisp/erc/erc-desktop-notifications.el:
* lisp/erc/erc-ezbounce.el, lisp/erc/erc-fill.el:
* lisp/erc/erc-identd.el, lisp/erc/erc-imenu.el:
* lisp/erc/erc-join.el, lisp/erc/erc-list.el, lisp/erc/erc-log.el:
* lisp/erc/erc-match.el, lisp/erc/erc-menu.el:
* lisp/erc/erc-netsplit.el, lisp/erc/erc-notify.el:
* lisp/erc/erc-page.el, lisp/erc/erc-pcomplete.el:
* lisp/erc/erc-replace.el, lisp/erc/erc-ring.el:
* lisp/erc/erc-services.el, lisp/erc/erc-sound.el:
* lisp/erc/erc-speedbar.el, lisp/erc/erc-spelling.el:
* lisp/erc/erc-stamp.el, lisp/erc/erc-track.el:
* lisp/erc/erc-truncate.el, lisp/erc/erc-xdcc.el:
Set generated-autoload-file to "erc-loaddefs.el".
Diffstat (limited to 'lisp')
30 files changed, 69 insertions, 26 deletions
diff --git a/lisp/erc/erc-autoaway.el b/lisp/erc/erc-autoaway.el index aa74957fc94..86ca5610abc 100644 --- a/lisp/erc/erc-autoaway.el +++ b/lisp/erc/erc-autoaway.el | |||
| @@ -82,7 +82,7 @@ This is used when `erc-autoaway-idle-method' is 'user." | |||
| 82 | (unless (erc-autoaway-some-server-buffer) | 82 | (unless (erc-autoaway-some-server-buffer) |
| 83 | (remove-hook 'post-command-hook 'erc-autoaway-reset-idle-user))) | 83 | (remove-hook 'post-command-hook 'erc-autoaway-reset-idle-user))) |
| 84 | 84 | ||
| 85 | ;;;###autoload (autoload 'erc-autoaway-mode "erc-autoaway") | 85 | ;;;###autoload(autoload 'erc-autoaway-mode "erc-autoaway") |
| 86 | (define-erc-module autoaway nil | 86 | (define-erc-module autoaway nil |
| 87 | "In ERC autoaway mode, you can be set away automatically. | 87 | "In ERC autoaway mode, you can be set away automatically. |
| 88 | If `erc-auto-set-away' is set, then you will be set away after | 88 | If `erc-auto-set-away' is set, then you will be set away after |
| @@ -282,6 +282,7 @@ active server buffer available." | |||
| 282 | ;;; erc-autoaway.el ends here | 282 | ;;; erc-autoaway.el ends here |
| 283 | ;; | 283 | ;; |
| 284 | ;; Local Variables: | 284 | ;; Local Variables: |
| 285 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 285 | ;; indent-tabs-mode: t | 286 | ;; indent-tabs-mode: t |
| 286 | ;; tab-width: 8 | 287 | ;; tab-width: 8 |
| 287 | ;; End: | 288 | ;; End: |
diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el index 606e1a28e1f..04f3096650c 100644 --- a/lisp/erc/erc-button.el +++ b/lisp/erc/erc-button.el | |||
| @@ -49,7 +49,7 @@ | |||
| 49 | "Define how text can be turned into clickable buttons." | 49 | "Define how text can be turned into clickable buttons." |
| 50 | :group 'erc) | 50 | :group 'erc) |
| 51 | 51 | ||
| 52 | ;;;###autoload (autoload 'erc-button-mode "erc-button" nil t) | 52 | ;;;###autoload(autoload 'erc-button-mode "erc-button" nil t) |
| 53 | (define-erc-module button nil | 53 | (define-erc-module button nil |
| 54 | "This mode buttonizes all messages according to `erc-button-alist'." | 54 | "This mode buttonizes all messages according to `erc-button-alist'." |
| 55 | ((add-hook 'erc-insert-modify-hook 'erc-button-add-buttons 'append) | 55 | ((add-hook 'erc-insert-modify-hook 'erc-button-add-buttons 'append) |
| @@ -545,5 +545,6 @@ and `apropos' for other symbols." | |||
| 545 | 545 | ||
| 546 | ;;; erc-button.el ends here | 546 | ;;; erc-button.el ends here |
| 547 | ;; Local Variables: | 547 | ;; Local Variables: |
| 548 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 548 | ;; indent-tabs-mode: nil | 549 | ;; indent-tabs-mode: nil |
| 549 | ;; End: | 550 | ;; End: |
diff --git a/lisp/erc/erc-capab.el b/lisp/erc/erc-capab.el index 12f6120419a..1830cca40ed 100644 --- a/lisp/erc/erc-capab.el +++ b/lisp/erc/erc-capab.el | |||
| @@ -90,7 +90,7 @@ character not found in IRC nicknames to avoid confusion." | |||
| 90 | 90 | ||
| 91 | ;;; Define module: | 91 | ;;; Define module: |
| 92 | 92 | ||
| 93 | ;;;###autoload (autoload 'erc-capab-identify-mode "erc-capab" nil t) | 93 | ;;;###autoload(autoload 'erc-capab-identify-mode "erc-capab" nil t) |
| 94 | (define-erc-module capab-identify nil | 94 | (define-erc-module capab-identify nil |
| 95 | "Handle dancer-ircd's CAPAB IDENTIFY-MSG and IDENTIFY-CTCP." | 95 | "Handle dancer-ircd's CAPAB IDENTIFY-MSG and IDENTIFY-CTCP." |
| 96 | ;; append so that `erc-server-parameters' is already set by `erc-server-005' | 96 | ;; append so that `erc-server-parameters' is already set by `erc-server-005' |
| @@ -207,3 +207,7 @@ PARSED is an `erc-parsed' response struct." | |||
| 207 | (provide 'erc-capab) | 207 | (provide 'erc-capab) |
| 208 | 208 | ||
| 209 | ;;; erc-capab.el ends here | 209 | ;;; erc-capab.el ends here |
| 210 | |||
| 211 | ;; Local Variables: | ||
| 212 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 213 | ;; End: | ||
diff --git a/lisp/erc/erc-compat.el b/lisp/erc/erc-compat.el index ec79046643e..d4e07029107 100644 --- a/lisp/erc/erc-compat.el +++ b/lisp/erc/erc-compat.el | |||
| @@ -29,7 +29,7 @@ | |||
| 29 | 29 | ||
| 30 | (require 'format-spec) | 30 | (require 'format-spec) |
| 31 | 31 | ||
| 32 | ;;;###autoload (autoload 'erc-define-minor-mode "erc-compat") | 32 | ;;;###autoload(autoload 'erc-define-minor-mode "erc-compat") |
| 33 | (defalias 'erc-define-minor-mode 'define-minor-mode) | 33 | (defalias 'erc-define-minor-mode 'define-minor-mode) |
| 34 | (put 'erc-define-minor-mode 'edebug-form-spec 'define-minor-mode) | 34 | (put 'erc-define-minor-mode 'edebug-form-spec 'define-minor-mode) |
| 35 | 35 | ||
| @@ -161,6 +161,7 @@ If START or END is negative, it counts from the end." | |||
| 161 | ;;; erc-compat.el ends here | 161 | ;;; erc-compat.el ends here |
| 162 | ;; | 162 | ;; |
| 163 | ;; Local Variables: | 163 | ;; Local Variables: |
| 164 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 164 | ;; indent-tabs-mode: t | 165 | ;; indent-tabs-mode: t |
| 165 | ;; tab-width: 8 | 166 | ;; tab-width: 8 |
| 166 | ;; End: | 167 | ;; End: |
diff --git a/lisp/erc/erc-dcc.el b/lisp/erc/erc-dcc.el index dba48f6dcfd..0ab3a30364a 100644 --- a/lisp/erc/erc-dcc.el +++ b/lisp/erc/erc-dcc.el | |||
| @@ -56,7 +56,7 @@ | |||
| 56 | (require 'erc) | 56 | (require 'erc) |
| 57 | (eval-when-compile (require 'pcomplete)) | 57 | (eval-when-compile (require 'pcomplete)) |
| 58 | 58 | ||
| 59 | ;;;###autoload (autoload 'erc-dcc-mode "erc-dcc") | 59 | ;;;###autoload(autoload 'erc-dcc-mode "erc-dcc") |
| 60 | (define-erc-module dcc nil | 60 | (define-erc-module dcc nil |
| 61 | "Provide Direct Client-to-Client support for ERC." | 61 | "Provide Direct Client-to-Client support for ERC." |
| 62 | ((add-hook 'erc-server-401-functions 'erc-dcc-no-such-nick)) | 62 | ((add-hook 'erc-server-401-functions 'erc-dcc-no-such-nick)) |
| @@ -1258,5 +1258,6 @@ other client." | |||
| 1258 | ;;; erc-dcc.el ends here | 1258 | ;;; erc-dcc.el ends here |
| 1259 | ;; | 1259 | ;; |
| 1260 | ;; Local Variables: | 1260 | ;; Local Variables: |
| 1261 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 1261 | ;; indent-tabs-mode: nil | 1262 | ;; indent-tabs-mode: nil |
| 1262 | ;; End: | 1263 | ;; End: |
diff --git a/lisp/erc/erc-desktop-notifications.el b/lisp/erc/erc-desktop-notifications.el index 47504c91e4b..b35b713fc65 100644 --- a/lisp/erc/erc-desktop-notifications.el +++ b/lisp/erc/erc-desktop-notifications.el | |||
| @@ -98,3 +98,7 @@ This will replace the last notification sent with this function." | |||
| 98 | (provide 'erc-desktop-notifications) | 98 | (provide 'erc-desktop-notifications) |
| 99 | 99 | ||
| 100 | ;;; erc-desktop-notifications.el ends here | 100 | ;;; erc-desktop-notifications.el ends here |
| 101 | |||
| 102 | ;; Local Variables: | ||
| 103 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 104 | ;; End: | ||
diff --git a/lisp/erc/erc-ezbounce.el b/lisp/erc/erc-ezbounce.el index 3af1bd7f7ac..45baa1d1a4c 100644 --- a/lisp/erc/erc-ezbounce.el +++ b/lisp/erc/erc-ezbounce.el | |||
| @@ -175,3 +175,7 @@ in the alist is nil, prompt for the appropriate values." | |||
| 175 | (provide 'erc-ezbounce) | 175 | (provide 'erc-ezbounce) |
| 176 | 176 | ||
| 177 | ;;; erc-ezbounce.el ends here | 177 | ;;; erc-ezbounce.el ends here |
| 178 | |||
| 179 | ;; Local Variables: | ||
| 180 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 181 | ;; End: | ||
diff --git a/lisp/erc/erc-fill.el b/lisp/erc/erc-fill.el index 2ca67d20362..35571ab362a 100644 --- a/lisp/erc/erc-fill.el +++ b/lisp/erc/erc-fill.el | |||
| @@ -37,7 +37,7 @@ | |||
| 37 | "Filling means to reformat long lines in different ways." | 37 | "Filling means to reformat long lines in different ways." |
| 38 | :group 'erc) | 38 | :group 'erc) |
| 39 | 39 | ||
| 40 | ;;;###autoload (autoload 'erc-fill-mode "erc-fill" nil t) | 40 | ;;;###autoload(autoload 'erc-fill-mode "erc-fill" nil t) |
| 41 | (erc-define-minor-mode erc-fill-mode | 41 | (erc-define-minor-mode erc-fill-mode |
| 42 | "Toggle ERC fill mode. | 42 | "Toggle ERC fill mode. |
| 43 | With a prefix argument ARG, enable ERC fill mode if ARG is | 43 | With a prefix argument ARG, enable ERC fill mode if ARG is |
| @@ -193,5 +193,6 @@ You can put this on `erc-insert-modify-hook' and/or `erc-send-modify-hook'." | |||
| 193 | 193 | ||
| 194 | ;;; erc-fill.el ends here | 194 | ;;; erc-fill.el ends here |
| 195 | ;; Local Variables: | 195 | ;; Local Variables: |
| 196 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 196 | ;; indent-tabs-mode: nil | 197 | ;; indent-tabs-mode: nil |
| 197 | ;; End: | 198 | ;; End: |
diff --git a/lisp/erc/erc-identd.el b/lisp/erc/erc-identd.el index c237325e483..42133110a23 100644 --- a/lisp/erc/erc-identd.el +++ b/lisp/erc/erc-identd.el | |||
| @@ -55,7 +55,7 @@ This can be either a string or a number." | |||
| 55 | (integer :tag "Port number") | 55 | (integer :tag "Port number") |
| 56 | (string :tag "Port string"))) | 56 | (string :tag "Port string"))) |
| 57 | 57 | ||
| 58 | ;;;###autoload (autoload 'erc-identd-mode "erc-identd") | 58 | ;;;###autoload(autoload 'erc-identd-mode "erc-identd") |
| 59 | (define-erc-module identd nil | 59 | (define-erc-module identd nil |
| 60 | "This mode launches an identd server on port 8113." | 60 | "This mode launches an identd server on port 8113." |
| 61 | ((add-hook 'erc-connect-pre-hook 'erc-identd-quickstart) | 61 | ((add-hook 'erc-connect-pre-hook 'erc-identd-quickstart) |
| @@ -115,6 +115,7 @@ The default port is specified by `erc-identd-port'." | |||
| 115 | ;;; erc-identd.el ends here | 115 | ;;; erc-identd.el ends here |
| 116 | ;; | 116 | ;; |
| 117 | ;; Local Variables: | 117 | ;; Local Variables: |
| 118 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 118 | ;; indent-tabs-mode: t | 119 | ;; indent-tabs-mode: t |
| 119 | ;; tab-width: 8 | 120 | ;; tab-width: 8 |
| 120 | ;; End: | 121 | ;; End: |
diff --git a/lisp/erc/erc-imenu.el b/lisp/erc/erc-imenu.el index 9440cb10e74..f74674b8f98 100644 --- a/lisp/erc/erc-imenu.el +++ b/lisp/erc/erc-imenu.el | |||
| @@ -131,6 +131,7 @@ Don't rely on this function, read it first!" | |||
| 131 | ;;; erc-imenu.el ends here | 131 | ;;; erc-imenu.el ends here |
| 132 | ;; | 132 | ;; |
| 133 | ;; Local Variables: | 133 | ;; Local Variables: |
| 134 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 134 | ;; indent-tabs-mode: t | 135 | ;; indent-tabs-mode: t |
| 135 | ;; tab-width: 8 | 136 | ;; tab-width: 8 |
| 136 | ;; End: | 137 | ;; End: |
diff --git a/lisp/erc/erc-join.el b/lisp/erc/erc-join.el index 3c4136c2617..c4d80f0ada5 100644 --- a/lisp/erc/erc-join.el +++ b/lisp/erc/erc-join.el | |||
| @@ -39,7 +39,7 @@ | |||
| 39 | "Enable autojoining." | 39 | "Enable autojoining." |
| 40 | :group 'erc) | 40 | :group 'erc) |
| 41 | 41 | ||
| 42 | ;;;###autoload (autoload 'erc-autojoin-mode "erc-join" nil t) | 42 | ;;;###autoload(autoload 'erc-autojoin-mode "erc-join" nil t) |
| 43 | (define-erc-module autojoin nil | 43 | (define-erc-module autojoin nil |
| 44 | "Makes ERC autojoin on connects and reconnects." | 44 | "Makes ERC autojoin on connects and reconnects." |
| 45 | ((add-hook 'erc-after-connect 'erc-autojoin-channels) | 45 | ((add-hook 'erc-after-connect 'erc-autojoin-channels) |
| @@ -215,6 +215,7 @@ This function is run from `erc-nickserv-identified-hook'." | |||
| 215 | ;;; erc-join.el ends here | 215 | ;;; erc-join.el ends here |
| 216 | ;; | 216 | ;; |
| 217 | ;; Local Variables: | 217 | ;; Local Variables: |
| 218 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 218 | ;; indent-tabs-mode: t | 219 | ;; indent-tabs-mode: t |
| 219 | ;; tab-width: 8 | 220 | ;; tab-width: 8 |
| 220 | ;; End: | 221 | ;; End: |
diff --git a/lisp/erc/erc-list.el b/lisp/erc/erc-list.el index 4248c6a5fe8..7a6ba821134 100644 --- a/lisp/erc/erc-list.el +++ b/lisp/erc/erc-list.el | |||
| @@ -55,7 +55,7 @@ | |||
| 55 | (defvar erc-list-server-buffer nil) | 55 | (defvar erc-list-server-buffer nil) |
| 56 | 56 | ||
| 57 | ;; Define module: | 57 | ;; Define module: |
| 58 | ;;;###autoload (autoload 'erc-list-mode "erc-list") | 58 | ;;;###autoload(autoload 'erc-list-mode "erc-list") |
| 59 | (define-erc-module list nil | 59 | (define-erc-module list nil |
| 60 | "List channels nicely in a separate buffer." | 60 | "List channels nicely in a separate buffer." |
| 61 | ((remove-hook 'erc-server-321-functions 'erc-server-321-message) | 61 | ((remove-hook 'erc-server-321-functions 'erc-server-321-message) |
| @@ -225,6 +225,7 @@ to RFC and send the LIST header (#321) at start of list transmission." | |||
| 225 | ;;; erc-list.el ends here | 225 | ;;; erc-list.el ends here |
| 226 | ;; | 226 | ;; |
| 227 | ;; Local Variables: | 227 | ;; Local Variables: |
| 228 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 228 | ;; indent-tabs-mode: t | 229 | ;; indent-tabs-mode: t |
| 229 | ;; tab-width: 8 | 230 | ;; tab-width: 8 |
| 230 | ;; End: | 231 | ;; End: |
diff --git a/lisp/erc/erc-log.el b/lisp/erc/erc-log.el index b8b00297a56..e48d5ff80ee 100644 --- a/lisp/erc/erc-log.el +++ b/lisp/erc/erc-log.el | |||
| @@ -215,7 +215,7 @@ The function should take one argument, which is the text to filter." | |||
| 215 | (const :tag "No filtering" nil))) | 215 | (const :tag "No filtering" nil))) |
| 216 | 216 | ||
| 217 | 217 | ||
| 218 | ;;;###autoload (autoload 'erc-log-mode "erc-log" nil t) | 218 | ;;;###autoload(autoload 'erc-log-mode "erc-log" nil t) |
| 219 | (define-erc-module log nil | 219 | (define-erc-module log nil |
| 220 | "Automatically logs things you receive on IRC into files. | 220 | "Automatically logs things you receive on IRC into files. |
| 221 | Files are stored in `erc-log-channels-directory'; file name | 221 | Files are stored in `erc-log-channels-directory'; file name |
| @@ -455,6 +455,7 @@ You can save every individual message by putting this function on | |||
| 455 | ;;; erc-log.el ends here | 455 | ;;; erc-log.el ends here |
| 456 | ;; | 456 | ;; |
| 457 | ;; Local Variables: | 457 | ;; Local Variables: |
| 458 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 458 | ;; indent-tabs-mode: t | 459 | ;; indent-tabs-mode: t |
| 459 | ;; tab-width: 8 | 460 | ;; tab-width: 8 |
| 460 | ;; End: | 461 | ;; End: |
diff --git a/lisp/erc/erc-match.el b/lisp/erc/erc-match.el index 60e9425ce33..b13b6f7d44a 100644 --- a/lisp/erc/erc-match.el +++ b/lisp/erc/erc-match.el | |||
| @@ -44,7 +44,7 @@ Group containing all things concerning pattern matching in ERC | |||
| 44 | messages." | 44 | messages." |
| 45 | :group 'erc) | 45 | :group 'erc) |
| 46 | 46 | ||
| 47 | ;;;###autoload (autoload 'erc-match-mode "erc-match") | 47 | ;;;###autoload(autoload 'erc-match-mode "erc-match") |
| 48 | (define-erc-module match nil | 48 | (define-erc-module match nil |
| 49 | "This mode checks whether messages match certain patterns. If so, | 49 | "This mode checks whether messages match certain patterns. If so, |
| 50 | they are hidden or highlighted. This is controlled via the variables | 50 | they are hidden or highlighted. This is controlled via the variables |
| @@ -648,6 +648,7 @@ This function is meant to be called from `erc-text-matched-hook'." | |||
| 648 | ;;; erc-match.el ends here | 648 | ;;; erc-match.el ends here |
| 649 | ;; | 649 | ;; |
| 650 | ;; Local Variables: | 650 | ;; Local Variables: |
| 651 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 651 | ;; indent-tabs-mode: t | 652 | ;; indent-tabs-mode: t |
| 652 | ;; tab-width: 8 | 653 | ;; tab-width: 8 |
| 653 | ;; End: | 654 | ;; End: |
diff --git a/lisp/erc/erc-menu.el b/lisp/erc/erc-menu.el index 79e583138da..3702886aa3c 100644 --- a/lisp/erc/erc-menu.el +++ b/lisp/erc/erc-menu.el | |||
| @@ -107,7 +107,7 @@ | |||
| 107 | "Internal variable used to keep track of whether we've defined the | 107 | "Internal variable used to keep track of whether we've defined the |
| 108 | ERC menu yet.") | 108 | ERC menu yet.") |
| 109 | 109 | ||
| 110 | ;;;###autoload (autoload 'erc-menu-mode "erc-menu" nil t) | 110 | ;;;###autoload(autoload 'erc-menu-mode "erc-menu" nil t) |
| 111 | (define-erc-module menu nil | 111 | (define-erc-module menu nil |
| 112 | "Enable a menu in ERC buffers." | 112 | "Enable a menu in ERC buffers." |
| 113 | ((unless erc-menu-defined | 113 | ((unless erc-menu-defined |
| @@ -148,6 +148,7 @@ ERC menu yet.") | |||
| 148 | ;;; erc-menu.el ends here | 148 | ;;; erc-menu.el ends here |
| 149 | ;; | 149 | ;; |
| 150 | ;; Local Variables: | 150 | ;; Local Variables: |
| 151 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 151 | ;; indent-tabs-mode: t | 152 | ;; indent-tabs-mode: t |
| 152 | ;; tab-width: 8 | 153 | ;; tab-width: 8 |
| 153 | ;; End: | 154 | ;; End: |
diff --git a/lisp/erc/erc-netsplit.el b/lisp/erc/erc-netsplit.el index 71ac0101caf..52b671c6114 100644 --- a/lisp/erc/erc-netsplit.el +++ b/lisp/erc/erc-netsplit.el | |||
| @@ -38,7 +38,7 @@ netsplit happens, and filters the QUIT messages. It also keeps | |||
| 38 | track of netsplits, so that it can filter the JOIN messages on a netjoin too." | 38 | track of netsplits, so that it can filter the JOIN messages on a netjoin too." |
| 39 | :group 'erc) | 39 | :group 'erc) |
| 40 | 40 | ||
| 41 | ;;;###autoload (autoload 'erc-netsplit-mode "erc-netsplit") | 41 | ;;;###autoload(autoload 'erc-netsplit-mode "erc-netsplit") |
| 42 | (define-erc-module netsplit nil | 42 | (define-erc-module netsplit nil |
| 43 | "This mode hides quit/join messages if a netsplit occurs." | 43 | "This mode hides quit/join messages if a netsplit occurs." |
| 44 | ((erc-netsplit-install-message-catalogs) | 44 | ((erc-netsplit-install-message-catalogs) |
| @@ -205,6 +205,7 @@ join from that split has been detected or not.") | |||
| 205 | ;;; erc-netsplit.el ends here | 205 | ;;; erc-netsplit.el ends here |
| 206 | ;; | 206 | ;; |
| 207 | ;; Local Variables: | 207 | ;; Local Variables: |
| 208 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 208 | ;; indent-tabs-mode: t | 209 | ;; indent-tabs-mode: t |
| 209 | ;; tab-width: 8 | 210 | ;; tab-width: 8 |
| 210 | ;; End: | 211 | ;; End: |
diff --git a/lisp/erc/erc-notify.el b/lisp/erc/erc-notify.el index 983773d3fb4..3f235d3d452 100644 --- a/lisp/erc/erc-notify.el +++ b/lisp/erc/erc-notify.el | |||
| @@ -92,7 +92,7 @@ strings." | |||
| 92 | (notify_on . "Detected %n on IRC network %m") | 92 | (notify_on . "Detected %n on IRC network %m") |
| 93 | (notify_off . "%n has left IRC network %m")))) | 93 | (notify_off . "%n has left IRC network %m")))) |
| 94 | 94 | ||
| 95 | ;;;###autoload (autoload 'erc-notify-mode "erc-notify" nil t) | 95 | ;;;###autoload(autoload 'erc-notify-mode "erc-notify" nil t) |
| 96 | (define-erc-module notify nil | 96 | (define-erc-module notify nil |
| 97 | "Periodically check for the online status of certain users and report | 97 | "Periodically check for the online status of certain users and report |
| 98 | changes." | 98 | changes." |
| @@ -253,6 +253,7 @@ with args, toggle notify status of people." | |||
| 253 | ;;; erc-notify.el ends here | 253 | ;;; erc-notify.el ends here |
| 254 | ;; | 254 | ;; |
| 255 | ;; Local Variables: | 255 | ;; Local Variables: |
| 256 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 256 | ;; indent-tabs-mode: t | 257 | ;; indent-tabs-mode: t |
| 257 | ;; tab-width: 8 | 258 | ;; tab-width: 8 |
| 258 | ;; End: | 259 | ;; End: |
diff --git a/lisp/erc/erc-page.el b/lisp/erc/erc-page.el index 1b453c5b5f1..20811407e32 100644 --- a/lisp/erc/erc-page.el +++ b/lisp/erc/erc-page.el | |||
| @@ -30,7 +30,7 @@ | |||
| 30 | 30 | ||
| 31 | (require 'erc) | 31 | (require 'erc) |
| 32 | 32 | ||
| 33 | ;;;###autoload (autoload 'erc-page-mode "erc-page") | 33 | ;;;###autoload(autoload 'erc-page-mode "erc-page") |
| 34 | (define-erc-module page ctcp-page | 34 | (define-erc-module page ctcp-page |
| 35 | "Process CTCP PAGE requests from IRC." | 35 | "Process CTCP PAGE requests from IRC." |
| 36 | nil nil) | 36 | nil nil) |
| @@ -107,6 +107,7 @@ receive pages if `erc-page-mode' is on." | |||
| 107 | ;;; erc-page.el ends here | 107 | ;;; erc-page.el ends here |
| 108 | ;; | 108 | ;; |
| 109 | ;; Local Variables: | 109 | ;; Local Variables: |
| 110 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 110 | ;; indent-tabs-mode: t | 111 | ;; indent-tabs-mode: t |
| 111 | ;; tab-width: 8 | 112 | ;; tab-width: 8 |
| 112 | ;; End: | 113 | ;; End: |
diff --git a/lisp/erc/erc-pcomplete.el b/lisp/erc/erc-pcomplete.el index 893bcc0564d..bf20f5c3472 100644 --- a/lisp/erc/erc-pcomplete.el +++ b/lisp/erc/erc-pcomplete.el | |||
| @@ -60,7 +60,7 @@ the most recent speakers are listed first." | |||
| 60 | :group 'erc-pcomplete | 60 | :group 'erc-pcomplete |
| 61 | :type 'boolean) | 61 | :type 'boolean) |
| 62 | 62 | ||
| 63 | ;;;###autoload (autoload 'erc-completion-mode "erc-pcomplete" nil t) | 63 | ;;;###autoload(autoload 'erc-completion-mode "erc-pcomplete" nil t) |
| 64 | (define-erc-module pcomplete Completion | 64 | (define-erc-module pcomplete Completion |
| 65 | "In ERC Completion mode, the TAB key does completion whenever possible." | 65 | "In ERC Completion mode, the TAB key does completion whenever possible." |
| 66 | ((add-hook 'erc-mode-hook 'pcomplete-erc-setup) | 66 | ((add-hook 'erc-mode-hook 'pcomplete-erc-setup) |
| @@ -284,5 +284,6 @@ up to where point is right now." | |||
| 284 | ;;; erc-pcomplete.el ends here | 284 | ;;; erc-pcomplete.el ends here |
| 285 | ;; | 285 | ;; |
| 286 | ;; Local Variables: | 286 | ;; Local Variables: |
| 287 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 287 | ;; indent-tabs-mode: nil | 288 | ;; indent-tabs-mode: nil |
| 288 | ;; End: | 289 | ;; End: |
diff --git a/lisp/erc/erc-replace.el b/lisp/erc/erc-replace.el index 0b27076de5a..35be533939c 100644 --- a/lisp/erc/erc-replace.el +++ b/lisp/erc/erc-replace.el | |||
| @@ -77,7 +77,7 @@ It replaces text according to `erc-replace-alist'." | |||
| 77 | (eval to)))))) | 77 | (eval to)))))) |
| 78 | erc-replace-alist)) | 78 | erc-replace-alist)) |
| 79 | 79 | ||
| 80 | ;;;###autoload (autoload 'erc-replace-mode "erc-replace") | 80 | ;;;###autoload(autoload 'erc-replace-mode "erc-replace") |
| 81 | (define-erc-module replace nil | 81 | (define-erc-module replace nil |
| 82 | "This mode replaces incoming text according to `erc-replace-alist'." | 82 | "This mode replaces incoming text according to `erc-replace-alist'." |
| 83 | ((add-hook 'erc-insert-modify-hook | 83 | ((add-hook 'erc-insert-modify-hook |
| @@ -90,6 +90,7 @@ It replaces text according to `erc-replace-alist'." | |||
| 90 | ;;; erc-replace.el ends here | 90 | ;;; erc-replace.el ends here |
| 91 | ;; | 91 | ;; |
| 92 | ;; Local Variables: | 92 | ;; Local Variables: |
| 93 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 93 | ;; indent-tabs-mode: t | 94 | ;; indent-tabs-mode: t |
| 94 | ;; tab-width: 8 | 95 | ;; tab-width: 8 |
| 95 | ;; End: | 96 | ;; End: |
diff --git a/lisp/erc/erc-ring.el b/lisp/erc/erc-ring.el index 174eac2c5ee..2d6152ccea8 100644 --- a/lisp/erc/erc-ring.el +++ b/lisp/erc/erc-ring.el | |||
| @@ -42,7 +42,7 @@ | |||
| 42 | "An input ring for ERC." | 42 | "An input ring for ERC." |
| 43 | :group 'erc) | 43 | :group 'erc) |
| 44 | 44 | ||
| 45 | ;;;###autoload (autoload 'erc-ring-mode "erc-ring" nil t) | 45 | ;;;###autoload(autoload 'erc-ring-mode "erc-ring" nil t) |
| 46 | (define-erc-module ring nil | 46 | (define-erc-module ring nil |
| 47 | "Stores input in a ring so that previous commands and messages can | 47 | "Stores input in a ring so that previous commands and messages can |
| 48 | be recalled using M-p and M-n." | 48 | be recalled using M-p and M-n." |
| @@ -146,5 +146,6 @@ containing a password." | |||
| 146 | 146 | ||
| 147 | ;;; erc-ring.el ends here | 147 | ;;; erc-ring.el ends here |
| 148 | ;; Local Variables: | 148 | ;; Local Variables: |
| 149 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 149 | ;; indent-tabs-mode: nil | 150 | ;; indent-tabs-mode: nil |
| 150 | ;; End: | 151 | ;; End: |
diff --git a/lisp/erc/erc-services.el b/lisp/erc/erc-services.el index 6d0e7c85a96..f18b9d29b5b 100644 --- a/lisp/erc/erc-services.el +++ b/lisp/erc/erc-services.el | |||
| @@ -101,7 +101,7 @@ You can also use \\[erc-nickserv-identify-mode] to change modes." | |||
| 101 | (when (featurep 'erc-services) | 101 | (when (featurep 'erc-services) |
| 102 | (erc-nickserv-identify-mode val)))) | 102 | (erc-nickserv-identify-mode val)))) |
| 103 | 103 | ||
| 104 | ;;;###autoload (autoload 'erc-services-mode "erc-services" nil t) | 104 | ;;;###autoload(autoload 'erc-services-mode "erc-services" nil t) |
| 105 | (define-erc-module services nickserv | 105 | (define-erc-module services nickserv |
| 106 | "This mode automates communication with services." | 106 | "This mode automates communication with services." |
| 107 | ((erc-nickserv-identify-mode erc-nickserv-identify-mode)) | 107 | ((erc-nickserv-identify-mode erc-nickserv-identify-mode)) |
| @@ -453,6 +453,7 @@ When called interactively, read the password using `read-passwd'." | |||
| 453 | ;;; erc-services.el ends here | 453 | ;;; erc-services.el ends here |
| 454 | ;; | 454 | ;; |
| 455 | ;; Local Variables: | 455 | ;; Local Variables: |
| 456 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 456 | ;; indent-tabs-mode: t | 457 | ;; indent-tabs-mode: t |
| 457 | ;; tab-width: 8 | 458 | ;; tab-width: 8 |
| 458 | ;; End: | 459 | ;; End: |
diff --git a/lisp/erc/erc-sound.el b/lisp/erc/erc-sound.el index 8992639e1bb..ddf32b6dd7a 100644 --- a/lisp/erc/erc-sound.el +++ b/lisp/erc/erc-sound.el | |||
| @@ -46,7 +46,7 @@ | |||
| 46 | 46 | ||
| 47 | (require 'erc) | 47 | (require 'erc) |
| 48 | 48 | ||
| 49 | ;;;###autoload (autoload 'erc-sound-mode "erc-sound") | 49 | ;;;###autoload(autoload 'erc-sound-mode "erc-sound") |
| 50 | (define-erc-module sound ctcp-sound | 50 | (define-erc-module sound ctcp-sound |
| 51 | "In ERC sound mode, the client will respond to CTCP SOUND requests | 51 | "In ERC sound mode, the client will respond to CTCP SOUND requests |
| 52 | and play sound files as requested." | 52 | and play sound files as requested." |
| @@ -145,6 +145,7 @@ See also `play-sound-file'." | |||
| 145 | ;;; erc-sound.el ends here | 145 | ;;; erc-sound.el ends here |
| 146 | ;; | 146 | ;; |
| 147 | ;; Local Variables: | 147 | ;; Local Variables: |
| 148 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 148 | ;; indent-tabs-mode: t | 149 | ;; indent-tabs-mode: t |
| 149 | ;; tab-width: 8 | 150 | ;; tab-width: 8 |
| 150 | ;; End: | 151 | ;; End: |
diff --git a/lisp/erc/erc-speedbar.el b/lisp/erc/erc-speedbar.el index f530470ec53..5b052f0686c 100644 --- a/lisp/erc/erc-speedbar.el +++ b/lisp/erc/erc-speedbar.el | |||
| @@ -361,6 +361,7 @@ The INDENT level is ignored." | |||
| 361 | ;;; erc-speedbar.el ends here | 361 | ;;; erc-speedbar.el ends here |
| 362 | ;; | 362 | ;; |
| 363 | ;; Local Variables: | 363 | ;; Local Variables: |
| 364 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 364 | ;; indent-tabs-mode: t | 365 | ;; indent-tabs-mode: t |
| 365 | ;; tab-width: 8 | 366 | ;; tab-width: 8 |
| 366 | ;; End: | 367 | ;; End: |
diff --git a/lisp/erc/erc-spelling.el b/lisp/erc/erc-spelling.el index 2ccc54fa9c9..25c5450161b 100644 --- a/lisp/erc/erc-spelling.el +++ b/lisp/erc/erc-spelling.el | |||
| @@ -33,7 +33,7 @@ | |||
| 33 | (require 'erc) | 33 | (require 'erc) |
| 34 | (require 'flyspell) | 34 | (require 'flyspell) |
| 35 | 35 | ||
| 36 | ;;;###autoload (autoload 'erc-spelling-mode "erc-spelling" nil t) | 36 | ;;;###autoload(autoload 'erc-spelling-mode "erc-spelling" nil t) |
| 37 | (define-erc-module spelling nil | 37 | (define-erc-module spelling nil |
| 38 | "Enable flyspell mode in ERC buffers." | 38 | "Enable flyspell mode in ERC buffers." |
| 39 | ;; Use erc-connect-pre-hook instead of erc-mode-hook as pre-hook is | 39 | ;; Use erc-connect-pre-hook instead of erc-mode-hook as pre-hook is |
| @@ -109,3 +109,7 @@ The cadr is the beginning and the caddr is the end." | |||
| 109 | (provide 'erc-spelling) | 109 | (provide 'erc-spelling) |
| 110 | 110 | ||
| 111 | ;;; erc-spelling.el ends here | 111 | ;;; erc-spelling.el ends here |
| 112 | |||
| 113 | ;; Local Variables: | ||
| 114 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 115 | ;; End: | ||
diff --git a/lisp/erc/erc-stamp.el b/lisp/erc/erc-stamp.el index 2796722a94a..9f1b7fc968a 100644 --- a/lisp/erc/erc-stamp.el +++ b/lisp/erc/erc-stamp.el | |||
| @@ -158,7 +158,7 @@ from entering them and instead jump over them." | |||
| 158 | "ERC timestamp face." | 158 | "ERC timestamp face." |
| 159 | :group 'erc-faces) | 159 | :group 'erc-faces) |
| 160 | 160 | ||
| 161 | ;;;###autoload (autoload 'erc-timestamp-mode "erc-stamp" nil t) | 161 | ;;;###autoload(autoload 'erc-timestamp-mode "erc-stamp" nil t) |
| 162 | (define-erc-module stamp timestamp | 162 | (define-erc-module stamp timestamp |
| 163 | "This mode timestamps messages in the channel buffers." | 163 | "This mode timestamps messages in the channel buffers." |
| 164 | ((add-hook 'erc-mode-hook #'erc-munge-invisibility-spec) | 164 | ((add-hook 'erc-mode-hook #'erc-munge-invisibility-spec) |
| @@ -417,6 +417,7 @@ enabled when the message was inserted." | |||
| 417 | ;;; erc-stamp.el ends here | 417 | ;;; erc-stamp.el ends here |
| 418 | ;; | 418 | ;; |
| 419 | ;; Local Variables: | 419 | ;; Local Variables: |
| 420 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 420 | ;; indent-tabs-mode: t | 421 | ;; indent-tabs-mode: t |
| 421 | ;; tab-width: 8 | 422 | ;; tab-width: 8 |
| 422 | ;; End: | 423 | ;; End: |
diff --git a/lisp/erc/erc-track.el b/lisp/erc/erc-track.el index b1b893bf2b9..b94b6de8833 100644 --- a/lisp/erc/erc-track.el +++ b/lisp/erc/erc-track.el | |||
| @@ -542,7 +542,7 @@ keybindings will not do anything useful." | |||
| 542 | 542 | ||
| 543 | ;;; Module | 543 | ;;; Module |
| 544 | 544 | ||
| 545 | ;;;###autoload (autoload 'erc-track-mode "erc-track" nil t) | 545 | ;;;###autoload(autoload 'erc-track-mode "erc-track" nil t) |
| 546 | (define-erc-module track nil | 546 | (define-erc-module track nil |
| 547 | "This mode tracks ERC channel buffers with activity." | 547 | "This mode tracks ERC channel buffers with activity." |
| 548 | ;; Enable: | 548 | ;; Enable: |
| @@ -974,6 +974,7 @@ switch back to the last non-ERC buffer visited. Next is defined by | |||
| 974 | ;;; erc-track.el ends here | 974 | ;;; erc-track.el ends here |
| 975 | ;; | 975 | ;; |
| 976 | ;; Local Variables: | 976 | ;; Local Variables: |
| 977 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 977 | ;; indent-tabs-mode: t | 978 | ;; indent-tabs-mode: t |
| 978 | ;; tab-width: 8 | 979 | ;; tab-width: 8 |
| 979 | ;; End: | 980 | ;; End: |
diff --git a/lisp/erc/erc-truncate.el b/lisp/erc/erc-truncate.el index a50e2fbe5ea..acd8f63bb16 100644 --- a/lisp/erc/erc-truncate.el +++ b/lisp/erc/erc-truncate.el | |||
| @@ -43,7 +43,7 @@ Used only when auto-truncation is enabled. | |||
| 43 | :group 'erc-truncate | 43 | :group 'erc-truncate |
| 44 | :type 'integer) | 44 | :type 'integer) |
| 45 | 45 | ||
| 46 | ;;;###autoload (autoload 'erc-truncate-mode "erc-truncate" nil t) | 46 | ;;;###autoload(autoload 'erc-truncate-mode "erc-truncate" nil t) |
| 47 | (define-erc-module truncate nil | 47 | (define-erc-module truncate nil |
| 48 | "Truncate a query buffer if it gets too large. | 48 | "Truncate a query buffer if it gets too large. |
| 49 | This prevents the query buffer from getting too large, which can | 49 | This prevents the query buffer from getting too large, which can |
| @@ -112,6 +112,7 @@ Meant to be used in hooks, like `erc-insert-post-hook'." | |||
| 112 | ;;; erc-truncate.el ends here | 112 | ;;; erc-truncate.el ends here |
| 113 | ;; | 113 | ;; |
| 114 | ;; Local Variables: | 114 | ;; Local Variables: |
| 115 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 115 | ;; indent-tabs-mode: t | 116 | ;; indent-tabs-mode: t |
| 116 | ;; tab-width: 8 | 117 | ;; tab-width: 8 |
| 117 | ;; End: | 118 | ;; End: |
diff --git a/lisp/erc/erc-xdcc.el b/lisp/erc/erc-xdcc.el index 290e56e4236..6732c9cdc6e 100644 --- a/lisp/erc/erc-xdcc.el +++ b/lisp/erc/erc-xdcc.el | |||
| @@ -61,7 +61,7 @@ being evaluated and should return strings." | |||
| 61 | :group 'erc-dcc | 61 | :group 'erc-dcc |
| 62 | :type '(repeat (repeat :tag "Message" (choice string sexp)))) | 62 | :type '(repeat (repeat :tag "Message" (choice string sexp)))) |
| 63 | 63 | ||
| 64 | ;;;###autoload (autoload 'erc-xdcc-mode "erc-xdcc") | 64 | ;;;###autoload(autoload 'erc-xdcc-mode "erc-xdcc") |
| 65 | (define-erc-module xdcc nil | 65 | (define-erc-module xdcc nil |
| 66 | "Act as an XDCC file-server." | 66 | "Act as an XDCC file-server." |
| 67 | nil nil) | 67 | nil nil) |
| @@ -133,6 +133,7 @@ being evaluated and should return strings." | |||
| 133 | ;;; erc-xdcc.el ends here | 133 | ;;; erc-xdcc.el ends here |
| 134 | ;; | 134 | ;; |
| 135 | ;; Local Variables: | 135 | ;; Local Variables: |
| 136 | ;; generated-autoload-file: "erc-loaddefs.el" | ||
| 136 | ;; indent-tabs-mode: t | 137 | ;; indent-tabs-mode: t |
| 137 | ;; tab-width: 8 | 138 | ;; tab-width: 8 |
| 138 | ;; End: | 139 | ;; End: |
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index cf5d2a16f30..9b4c6ac48a3 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el | |||
| @@ -67,6 +67,8 @@ | |||
| 67 | 67 | ||
| 68 | ;;; Code: | 68 | ;;; Code: |
| 69 | 69 | ||
| 70 | (load "erc-loaddefs" nil t) | ||
| 71 | |||
| 70 | (eval-when-compile (require 'cl-lib)) | 72 | (eval-when-compile (require 'cl-lib)) |
| 71 | (require 'font-lock) | 73 | (require 'font-lock) |
| 72 | (require 'pp) | 74 | (require 'pp) |
| @@ -1272,7 +1274,7 @@ erc-NAME-enable, and erc-NAME-disable. | |||
| 1272 | 1274 | ||
| 1273 | Example: | 1275 | Example: |
| 1274 | 1276 | ||
| 1275 | ;;;###autoload (autoload \\='erc-replace-mode \"erc-replace\") | 1277 | ;;;###autoload(autoload \\='erc-replace-mode \"erc-replace\") |
| 1276 | (define-erc-module replace nil | 1278 | (define-erc-module replace nil |
| 1277 | \"This mode replaces incoming text according to `erc-replace-alist'.\" | 1279 | \"This mode replaces incoming text according to `erc-replace-alist'.\" |
| 1278 | ((add-hook \\='erc-insert-modify-hook | 1280 | ((add-hook \\='erc-insert-modify-hook |