aboutsummaryrefslogtreecommitdiff
path: root/guile/starlet
diff options
context:
space:
mode:
Diffstat (limited to 'guile/starlet')
-rw-r--r--guile/starlet/base.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/guile/starlet/base.scm b/guile/starlet/base.scm
index d6436f3..54c3806 100644
--- a/guile/starlet/base.scm
+++ b/guile/starlet/base.scm
@@ -4,6 +4,7 @@
#:use-module (ice-9 threads)
#:use-module (ice-9 atomic)
#:use-module (ice-9 receive)
+ #:use-module (ice-9 pretty-print)
#:use-module (web client)
#:use-module (web http)
#:use-module (web uri)
@@ -605,7 +606,7 @@ pre-existing contents."
(define (print-state a)
- (print-hash-table (get-state-hash-table a)))
+ (pretty-print (state-source a)))
(define (state-source a)