diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-12-21 16:17:28 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-12-22 22:58:30 +0100 |
| commit | d00fea566004e67161ee45246b239fff5d416b0e (patch) | |
| tree | 5641c0c0d0e78b046b6045ed2440512f12259560 /module/calp/main.scm | |
| parent | Complete rewrite of use2dot (diff) | |
| download | calp-d00fea566004e67161ee45246b239fff5d416b0e.tar.gz calp-d00fea566004e67161ee45246b239fff5d416b0e.tar.xz | |
Cleanup modules.
Primarly this moves all vcompenent input and output code to clearly
labeled modules, instead of being spread out. At the same time it also
removes a handfull of unused procedures.
Diffstat (limited to 'module/calp/main.scm')
| -rw-r--r-- | module/calp/main.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/calp/main.scm b/module/calp/main.scm index 1af2861a..a27e4c38 100644 --- a/module/calp/main.scm +++ b/module/calp/main.scm @@ -35,7 +35,7 @@ (description "Start a Guile repl which can be connected to, defaults to the unix socket " (i "/run/user/${UID}/calp-${PID}") ", but it can be bound to any unix or " - "TCP socket. ((@ (vcomponent instance) global-event-object)) " + "TCP socket. ((@ (vcomponent util instance) global-event-object)) " "should contain all events." (br) (b "Should NOT be used in production."))) @@ -260,5 +260,5 @@ ;; and prints them. (map (lambda (it) (with-output-to-port (current-error-port) - (lambda () ((@ (vcomponent describe) describe) it)))) + (lambda () ((@ (vcomponent util describe) describe) it)))) (filter-stack (@ (vcomponent) vcomponent?) (make-stack #t)))))) |