bin: Unbolden issue keywords and show them all on blue.

Bold issue keywords are too visually distracting. They compete with
highlit text in snippets.

* bin/tissue (print-issue): Unbolden issue keywords and show them all
on blue, instead of some on red and some on blue.

1 files changed, 3 insertions, 14 deletions

diff --git a/bin/tissue b/bin/tissue
index 862f807..f4a6532 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -99,20 +99,9 @@ to run tissue."
     ;; words in red. Else, highlight in blue.
     (unless (null? (issue-keywords issue))
       (display " ")
-      (display (string-join
-                (map (lambda (keyword)
-                       ((cut colorize-string
-                             <>
-                             (cond
-                              ((not (null? (lset-intersection
-                                            string=?
-                                            (string-split keyword #\space)
-                                            (list "bug" "critical"))))
-                               'ON-RED)
-                              (else 'ON-BLUE)))
-                        (string-append " " keyword " ")))
-                     (issue-keywords issue))
-                " ")))
+      (display (string-join (map (cut colorize-string <> 'ON-BLUE)
+                                 (issue-keywords issue))
+                            " ")))
     (unless (null? (issue-assigned issue))
       (display (colorize-string (string-append " (assigned: "
                                                (string-join (issue-assigned issue)