# HG changeset patch # User Miles Bader # Date 1142244066 0 # Node ID df75d16d140e7d28a3b0753161f8f4b00e94b0f3 # Parent 602d4778bd8a6830e18b41361656346fd436db53 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-155 Remove nick-abbrevs stuff from rcirc.el 2006-03-13 Miles Bader * lisp/net/rcirc.el (rcirc-nick-abbrevs): Variable removed. (rcirc-abbrev-nick): Function removed. (rcirc-format-response-string): Don't call `rcirc-abbrev-nick'. diff -r 602d4778bd8a -r df75d16d140e lisp/ChangeLog --- a/lisp/ChangeLog Mon Mar 13 07:49:31 2006 +0000 +++ b/lisp/ChangeLog Mon Mar 13 10:01:06 2006 +0000 @@ -1,3 +1,9 @@ +2006-03-13 Miles Bader + + * net/rcirc.el (rcirc-nick-abbrevs): Variable removed. + (rcirc-abbrev-nick): Function removed. + (rcirc-format-response-string): Don't call `rcirc-abbrev-nick'. + 2006-03-13 David Ponce * tree-widget.el: Handle themes across all occurrences of the main diff -r 602d4778bd8a -r df75d16d140e lisp/net/rcirc.el --- a/lisp/net/rcirc.el Mon Mar 13 07:49:31 2006 +0000 +++ b/lisp/net/rcirc.el Mon Mar 13 10:01:06 2006 +0000 @@ -195,12 +195,6 @@ :type '(repeat string) :group 'rcirc) -(defcustom rcirc-nick-abbrevs nil - "List of short replacements for printing nicks." - :type '(alist :key-type (string :tag "Nick") - :value-type (string :tag "Abbrev")) - :group 'rcirc) - (defvar rcirc-ignore-list-automatic () "List of ignored nicks added to `rcirc-ignore-list' because of renaming. When an ignored person renames, their nick is added to both lists. @@ -493,11 +487,6 @@ (with-rcirc-process-buffer process rcirc-nick)) -(defun rcirc-abbrev-nick (nick) - "If NICK has an entry in `rcirc-nick-abbrevs', return its abbreviation, -otherwise return NICK." - (or (cdr (assoc nick rcirc-nick-abbrevs)) nick)) - (defvar rcirc-max-message-length 450 "Messages longer than this value will be split.") @@ -975,7 +964,7 @@ process rcirc-server) sender) "" - (rcirc-abbrev-nick sender)) + sender) (and target (concat "," target))))) (rcirc-facify nick (if (eq key ?n)