From fd8f1685d1ff76d92e3ba1a7cf112c939ea5bbee Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Thu, 13 Mar 2014 22:20:05 -0700
Subject: [PATCH] update

---
 template.rkt | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

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