- (pcase (lurk-get-context-type to)
- ('channel (concat to " <" from ">"))
- ('nick (concat "[" from " -> " to "]"))
- (_
- (error "Unsupported context type")))
+ (propertize
+ (pcase (lurk-get-context-type to)
+ ('channel (concat to " <" from ">"))
+ ('nick (concat "[" from " -> " to "]"))
+ (_
+ (error "Unsupported context type")))
+ 'face (lurk-get-context-facelist context))