@@ -40,17 +40,20 @@
 
 (module setup racket/base
   (require syntax/modresolve pollen/setup)
   (provide (all-defined-out))
   (define poly-targets '(html))
-  (define block-tags (cons 'title default-block-tags))
+  (define block-tags (append '(title style) default-block-tags))
   (define cache-watchlist
     (map resolve-module-path '("tags-html.rkt"
                                "snippets-html.rkt"
                                "dust.rkt"
                                "crystalize.rkt"))))
 
+(case (current-poly-target)
+  [(html) (spell-of-summoning!)])
+
 ;; Macro for defining tag functions that automatically branch based on the 
 ;; current output format and the list of poly-targets in the setup module.
 ;; Use this macro when you know you will need keyword arguments.
 ;;
 (define-syntax (poly-branch-kwargs-tag stx)