Prettier test-view output
This commit is contained in:
parent
252e766648
commit
e8e7d1fcee
1 changed files with 1 additions and 1 deletions
|
@ -83,7 +83,7 @@
|
||||||
|
|
||||||
(define-view test
|
(define-view test
|
||||||
"Just a test view, see everything in todo-list."
|
"Just a test view, see everything in todo-list."
|
||||||
(write todo-list))
|
(format #t "~y" todo-list))
|
||||||
|
|
||||||
(define (view args)
|
(define (view args)
|
||||||
"Show a list of todo items."
|
"Show a list of todo items."
|
||||||
|
|
Loading…
Reference in a new issue