01/01: hydra: Filter joins, parts, and quits from logs.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository maintenance.

commit 6f7e2437b375fc585462d4f9a91f6db81a73db5f
Author: Ricardo Wurmus <address@hidden>
Date:   Thu Aug 8 16:52:34 2019 +0200

    hydra: Filter joins, parts, and quits from logs.
    
    * hydra/goggles.scm (make-line-renderer): Strip off joins/parts/quits
    lines.
---
 hydra/goggles.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/hydra/goggles.scm b/hydra/goggles.scm
index b762172..169b3c3 100644
--- a/hydra/goggles.scm
+++ b/hydra/goggles.scm
@@ -114,6 +114,9 @@ representation highlighting certain parts."
         (first colors)))
   (match-lambda
     (("") '(br))
+    ;; Filter noise.
+    ((time "***" (or "Joins:" "Parts:" "Quits:") . msg)
+     '())
     ((time "***" . msg)
      (let ((id (string-filter char-set:digit time)))
        `(div (@ (class "line") (id ,id))