aboutsummaryrefslogtreecommitdiff
path: root/module/main.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2020-05-22 23:39:21 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2020-05-23 12:59:19 +0200
commit60ade1ac7df55cd4034122cbdb20de70d91c1153 (patch)
treeb18810bb27073b70ffc804aa147d5abf927d294c /module/main.scm
parentRemove export functions from terminal output. (diff)
downloadcalp-60ade1ac7df55cd4034122cbdb20de70d91c1153.tar.gz
calp-60ade1ac7df55cd4034122cbdb20de70d91c1153.tar.xz
Remove (vcomponent output) module.
Diffstat (limited to 'module/main.scm')
-rw-r--r--module/main.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/module/main.scm b/module/main.scm
index f8dca2de..7119278e 100644
--- a/module/main.scm
+++ b/module/main.scm
@@ -161,9 +161,7 @@
(let ((event (and=> (frame-lookup-binding frame 'event)
binding-ref)))
(when event
- (format (current-error-port) "event = ~a~%" event)
- ((@ (vcomponent output) serialize-vcomponent)
- event (current-error-port))))
+ (format (current-error-port) "event = ~a~%" event)))
(loop (frame-previous frame))))
(format #t "~%")