# HG changeset patch # User Juanma Barranquero # Date 1210027814 0 # Node ID bef74fdb0ed32da1625db7b2e81b2c6f16633111 # Parent d0547efd97db3ec4765a8db4d304c14262938d65 (erc-noncommands-list, noncommands, erc-control-characters, erc-interpret-controls-p, erc-interpret-mirc-color): Fix typos in docstrings. (erc-controls-highlight): Reflow docstring. diff -r d0547efd97db -r bef74fdb0ed3 lisp/erc/erc-goodies.el --- a/lisp/erc/erc-goodies.el Mon May 05 22:33:44 2008 +0000 +++ b/lisp/erc/erc-goodies.el Mon May 05 22:50:14 2008 +0000 @@ -164,13 +164,13 @@ erc-cmd-SM erc-cmd-SMV erc-cmd-LASTLOG) - "List of commands that are aliases for CTCP ACTION or for erc messages. + "List of commands that are aliases for CTCP ACTION or for ERC messages. If a command's function symbol is in this list, the typed command does not appear in the ERC buffer after the user presses ENTER.") (define-erc-module noncommands nil - "This mode distinguishies non-commands. + "This mode distinguishes non-commands. Commands listed in `erc-insert-this' know how to display themselves." ((add-hook 'erc-send-pre-hook 'erc-send-distinguish-noncommands)) @@ -188,11 +188,11 @@ ;;; IRC control character processing. (defgroup erc-control-characters nil - "Dealing with control characters" + "Dealing with control characters." :group 'erc) (defcustom erc-interpret-controls-p t - "*If non-nil, display IRC colours and other highlighting effects. + "*If non-nil, display IRC colors and other highlighting effects. If this is set to the symbol `remove', ERC removes all IRC colors and highlighting effects. When this variable is non-nil, it can cause Emacs to run @@ -205,7 +205,7 @@ (const :tag "Display raw control characters" nil))) (defcustom erc-interpret-mirc-color nil - "*If non-nil, erc will interpret mIRC color codes." + "*If non-nil, ERC will interpret mIRC color codes." :group 'erc-control-characters :type 'boolean) @@ -428,9 +428,8 @@ (defun erc-controls-highlight () "Highlight IRC control chars in the buffer. -This is useful for `erc-insert-modify-hook' and -`erc-send-modify-hook'. Also see `erc-interpret-controls-p' and -`erc-interpret-mirc-color'." +This is useful for `erc-insert-modify-hook' and `erc-send-modify-hook'. +Also see `erc-interpret-controls-p' and `erc-interpret-mirc-color'." (goto-char (point-min)) (cond ((eq erc-interpret-controls-p 'remove) (while (re-search-forward erc-controls-remove-regexp nil t)