+ (with-current-buffer "*murk*"
+ (setq-local header-line-format
+ '((:eval
+ (let* ((ctx (murk-current-context)))
+ (if ctx
+ (let ((server (murk-context-server ctx)))
+ (concat
+ "Network: " server ", "
+ (if (murk-server-context-p ctx)
+ "Server"
+ (concat
+ "Channel: "
+ (murk-context-name ctx)
+ " ("
+ (number-to-string
+ (length (murk-context-users ctx)))
+ ")"))))
+ "No connection")))))))