From 97b4dea0ca8fd72ae826b3b285ee07d7802611d8 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 9 Jun 2015 17:06:31 -0700 Subject: [PATCH] allow anonymous here-path --- template.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/template.rkt b/template.rkt index e1b25d6..38f105e 100644 --- a/template.rkt +++ b/template.rkt @@ -8,7 +8,7 @@ (define/contract+provide (metas->here metas) (hash? . -> . pagenode?) - (path->pagenode (select-from-metas 'here-path metas))) + (path->pagenode (or (select-from-metas 'here-path metas) 'unknown))) (define (pagenode->path pagenode)