From ee1ddf6ee04795855c684cae2b78acd1e1af27e7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Mon, 27 Apr 2020 18:08:24 +0200
Subject: Remove event-debug-html.

---
 module/output/html.scm | 12 ------------
 1 file changed, 12 deletions(-)

diff --git a/module/output/html.scm b/module/output/html.scm
index 7000aa6c..f15776cb 100644
--- a/module/output/html.scm
+++ b/module/output/html.scm
@@ -124,18 +124,6 @@
                 "📅"))
         ,(fmt-single-event ev)))
 
-(define (event-debug-html event)
-  (fmt-single-event event)
-  #;
-  `(table
-    (tbody
-     ,@(hash-map->list
-        (match-lambda*
-          [(key vline)
-           `(tr (th ,key) (td ,(format #f "~a" (value vline))))]
-          [_ (error "What are you doing‽")])
-        (attributes event)))))
-
 (define (data-attributes event)
   (hash-map->list
    (match-lambda*
-- 
cgit v1.2.3