aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2008-05-05 22:50:58 +0000
committerJuanma Barranquero2008-05-05 22:50:58 +0000
commitf44407aa4bab98e037cd1728cafb5575a1bc0482 (patch)
tree57cfd189e769143bfc9cb3a2003720d9c3c7e696
parentb236ab0da995fa79a16298d9094e748c09cb9f9c (diff)
downloademacs-f44407aa4bab98e037cd1728cafb5575a1bc0482.tar.gz
emacs-f44407aa4bab98e037cd1728cafb5575a1bc0482.zip
(erc-noncommands-list, noncommands, erc-control-characters,
erc-interpret-controls-p, erc-interpret-mirc-color): Fix typos in docstrings. (erc-controls-highlight): Reflow docstring.
-rw-r--r--lisp/erc/ChangeLog7
-rw-r--r--lisp/erc/erc-goodies.el15
2 files changed, 14 insertions, 8 deletions
diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog
index 637e6aa5f3b..4700aa3bccb 100644
--- a/lisp/erc/ChangeLog
+++ b/lisp/erc/ChangeLog
@@ -1,3 +1,10 @@
12008-05-05 Juanma Barranquero <lekktu@gmail.com>
2
3 * erc-goodies.el (erc-noncommands-list, noncommands)
4 (erc-control-characters, erc-interpret-controls-p)
5 (erc-interpret-mirc-color): Fix typos in docstrings.
6 (erc-controls-highlight): Reflow docstring.
7
12008-04-27 Glenn Morris <rgm@gnu.org> 82008-04-27 Glenn Morris <rgm@gnu.org>
2 9
3 * erc.el (erc-put-text-properties): Replace use of cl mapcar*. 10 * erc.el (erc-put-text-properties): Replace use of cl mapcar*.
diff --git a/lisp/erc/erc-goodies.el b/lisp/erc/erc-goodies.el
index ff065467f84..c97a50134d1 100644
--- a/lisp/erc/erc-goodies.el
+++ b/lisp/erc/erc-goodies.el
@@ -164,13 +164,13 @@ Put this function on `erc-insert-post-hook' and/or `erc-send-post-hook'."
164 erc-cmd-SM 164 erc-cmd-SM
165 erc-cmd-SMV 165 erc-cmd-SMV
166 erc-cmd-LASTLOG) 166 erc-cmd-LASTLOG)
167 "List of commands that are aliases for CTCP ACTION or for erc messages. 167 "List of commands that are aliases for CTCP ACTION or for ERC messages.
168 168
169If a command's function symbol is in this list, the typed command 169If a command's function symbol is in this list, the typed command
170does not appear in the ERC buffer after the user presses ENTER.") 170does not appear in the ERC buffer after the user presses ENTER.")
171 171
172(define-erc-module noncommands nil 172(define-erc-module noncommands nil
173 "This mode distinguishies non-commands. 173 "This mode distinguishes non-commands.
174Commands listed in `erc-insert-this' know how to display 174Commands listed in `erc-insert-this' know how to display
175themselves." 175themselves."
176 ((add-hook 'erc-send-pre-hook 'erc-send-distinguish-noncommands)) 176 ((add-hook 'erc-send-pre-hook 'erc-send-distinguish-noncommands))
@@ -188,11 +188,11 @@ themselves."
188 188
189;;; IRC control character processing. 189;;; IRC control character processing.
190(defgroup erc-control-characters nil 190(defgroup erc-control-characters nil
191 "Dealing with control characters" 191 "Dealing with control characters."
192 :group 'erc) 192 :group 'erc)
193 193
194(defcustom erc-interpret-controls-p t 194(defcustom erc-interpret-controls-p t
195 "*If non-nil, display IRC colours and other highlighting effects. 195 "*If non-nil, display IRC colors and other highlighting effects.
196 196
197If this is set to the symbol `remove', ERC removes all IRC colors and 197If this is set to the symbol `remove', ERC removes all IRC colors and
198highlighting effects. When this variable is non-nil, it can cause Emacs to run 198highlighting effects. When this variable is non-nil, it can cause Emacs to run
@@ -205,7 +205,7 @@ emergency (message flood) it can be turned off to save processing time. See
205 (const :tag "Display raw control characters" nil))) 205 (const :tag "Display raw control characters" nil)))
206 206
207(defcustom erc-interpret-mirc-color nil 207(defcustom erc-interpret-mirc-color nil
208 "*If non-nil, erc will interpret mIRC color codes." 208 "*If non-nil, ERC will interpret mIRC color codes."
209 :group 'erc-control-characters 209 :group 'erc-control-characters
210 :type 'boolean) 210 :type 'boolean)
211 211
@@ -428,9 +428,8 @@ See `erc-interpret-controls-p' and `erc-interpret-mirc-color' for options."
428 428
429(defun erc-controls-highlight () 429(defun erc-controls-highlight ()
430 "Highlight IRC control chars in the buffer. 430 "Highlight IRC control chars in the buffer.
431This is useful for `erc-insert-modify-hook' and 431This is useful for `erc-insert-modify-hook' and `erc-send-modify-hook'.
432`erc-send-modify-hook'. Also see `erc-interpret-controls-p' and 432Also see `erc-interpret-controls-p' and `erc-interpret-mirc-color'."
433`erc-interpret-mirc-color'."
434 (goto-char (point-min)) 433 (goto-char (point-min))
435 (cond ((eq erc-interpret-controls-p 'remove) 434 (cond ((eq erc-interpret-controls-p 'remove)
436 (while (re-search-forward erc-controls-remove-regexp nil t) 435 (while (re-search-forward erc-controls-remove-regexp nil t)