+(require 'riece-message)
+(require 'riece-commands)
+
+(eval-when-compile (require 'riece-highlight))
+
+(defgroup riece-unread nil
+ "Mark unread channels"
+ :tag "Unread"
+ :prefix "riece-"
+ :group 'riece)
+
+(defface riece-channel-list-unread-face
+ '((((class color)
+ (background dark))
+ (:foreground "orange"))
+ (((class color)
+ (background light))
+ (:foreground "firebrick"))
+ (t
+ (:bold t)))
+ "Face used for displaying unread channels."
+ :group 'riece-highlight-faces)
+(defvar riece-channel-list-unread-face 'riece-channel-list-unread-face)