* net/rcirc.el (rcirc-activity-string): Don't quote value in case

	clause.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1d739a3b7f04e8f0c77870b8e68875adedf0192f..0f3fc45611652f14e5896be0e1c1ad0611adb64a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-09-07  Magnus Henoch <mange@freemail.hu>
+
+       * net/rcirc.el (rcirc-activity-string): Don't quote value in case
+       clause.
+
 2006-09-07  Micha\e,Ak\e(Bl Cadilhac  <michael.cadilhac@lrde.org>
 
        * info.el (Info-index): Bind completion-ignore-case.

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 8c678b6ae5f535d479e0e2575cad5a55b16bbccb..19712d2a7164f3d88a0dd0159d74cc9ba77adba5 100644 (file)
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -1545,8 +1545,8 @@ activity.  Only run if the buffer is not visible and
                   (dolist (type rcirc-activity-types)
                     (rcirc-add-face 0 (length s)
                                     (case type
-                                      ('nick 'rcirc-track-nick)
-                                      ('keyword 'rcirc-track-keyword))
+                                      (nick 'rcirc-track-nick)
+                                      (keyword 'rcirc-track-keyword))
                                     s)))
                 s))
             buffers ","))