Rename test view to raw

This commit is contained in:
Tom Willemsen 2012-08-14 21:41:41 +02:00
parent e8e7d1fcee
commit b026bf9fcc

View file

@ -81,7 +81,7 @@
(display (cdr (assq 'content todo)))) (display (cdr (assq 'content todo))))
todo-list)) todo-list))
(define-view test (define-view raw
"Just a test view, see everything in todo-list." "Just a test view, see everything in todo-list."
(format #t "~y" todo-list)) (format #t "~y" todo-list))