[Erc-commit] [commit][master] erc-track: Show pals, fools, current nick, and dangerous hosts correctly.

[mwolson]

commit d565d4d6b008279c89b3f88df779616d92b52e95
Author: Michael W. Olson <address@hidden>
Date:   Mon Jan 21 18:30:36 2008 -0500

    erc-track: Show pals, fools, current nick, and dangerous hosts correctly.

diff --git a/ChangeLog b/ChangeLog
index d92fbee..fe9ca3b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -17,7 +17,8 @@
        * erc-track.el (erc-track-faces-priority-list): Replace erc-button
        with '(erc-button erc-default-face) so that we only care about
        buttons that are part of normal text.  Adjust customization type
-       to handle this case.  Make erc-nick-default-face a list.
+       to handle this case.  Make erc-nick-default-face a list.  Handle
+       pals, fools, current nick, and dangerous hosts.
        (erc-track-find-face): Simplify.  Adapt for list of faces case.
        (erc-faces-in): Don't deflate lists of faces.  Add them as-is.
        (erc-track-face-priority): Use equal instead of eq.
diff --git a/erc-track.el b/erc-track.el
index 3587771..2261fec 100644
--- a/erc-track.el
+++ b/erc-track.el
@@ -175,11 +175,21 @@ The faces used are the same as used for text in the 
buffers.
   :type 'boolean)
 
 (defcustom erc-track-faces-priority-list
-  '(erc-error-face erc-current-nick-face erc-keyword-face erc-pal-face
-    erc-nick-msg-face erc-direct-msg-face (erc-button erc-default-face)
-    erc-dangerous-host-face erc-default-face erc-action-face
-    (erc-nick-default-face erc-default-face) erc-fool-face
-    erc-notice-face erc-input-face erc-prompt-face)
+  '(erc-error-face
+    (erc-nick-default-face erc-current-nick-face)
+    erc-keyword-face
+    (erc-nick-default-face erc-pal-face)
+    erc-nick-msg-face
+    erc-direct-msg-face
+    (erc-button erc-default-face)
+    (erc-nick-default-face erc-dangerous-host-face)
+    erc-default-face
+    erc-action-face
+    (erc-nick-default-face erc-default-face)
+    (erc-nick-default-face erc-fool-face)
+    erc-notice-face
+    erc-input-face
+    erc-prompt-face)
   "A list of faces used to highlight active buffer names in the modeline.
 If a message contains one of the faces in this list, the buffer name will
 be highlighted using that face.  The first matching face is used."