[Emacs-diffs] Changes to emacs/lisp/net/rcirc.el

[Miles Bader]

Index: emacs/lisp/net/rcirc.el
diff -u emacs/lisp/net/rcirc.el:1.17 emacs/lisp/net/rcirc.el:1.18
--- emacs/lisp/net/rcirc.el:1.17        Fri Mar  3 11:43:27 2006
+++ emacs/lisp/net/rcirc.el     Mon Mar 13 10:01:06 2006
@@ -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)