diff --git a/template.rkt b/template.rkt index 5b9d78b..3f59d9e 100644 --- a/template.rkt +++ b/template.rkt @@ -75,11 +75,6 @@ [(_ condition body ...) #'(if condition (string-append* (with-handlers ([exn:fail? (λ(exn) (error (format "when/block: ~a" (exn-message exn))))]) - (map ->string (list body ...)))) + (map ->string (list body ...)))) ; todo: should this be ->html not ->string? "")])) - -(module+ main - - -(when/block #t (find 'topic "/Users/mb/git/bpt/introduction.html"))) \ No newline at end of file