diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-27 18:08:24 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-27 18:11:16 +0200 |
| commit | ee1ddf6ee04795855c684cae2b78acd1e1af27e7 (patch) | |
| tree | 2727537e9a94dc2dc279821be44436f425b2a4b1 | |
| parent | Replace code for small calendar. (diff) | |
| download | calp-ee1ddf6ee04795855c684cae2b78acd1e1af27e7.tar.gz calp-ee1ddf6ee04795855c684cae2b78acd1e1af27e7.tar.xz | |
Remove event-debug-html.
| -rw-r--r-- | module/output/html.scm | 12 |
1 files changed, 0 insertions, 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* |