diff --git a/extra/websites/concatenative/concatenative.factor b/extra/websites/concatenative/concatenative.factor index cc2b960f9f..4e6baa7271 100644 --- a/extra/websites/concatenative/concatenative.factor +++ b/extra/websites/concatenative/concatenative.factor @@ -38,6 +38,10 @@ IN: websites.concatenative TUPLE: factor-website < dispatcher ; +: ( responder -- responder' ) + + { factor-website "page" } >>template ; + : ( responder -- responder' ) "Factor website" "Factor website" >>name @@ -45,8 +49,6 @@ TUPLE: factor-website < dispatcher ; allow-password-recovery allow-edit-profile allow-deactivation - - { factor-website "page" } >>template test-db ; : ( -- responder ) @@ -74,15 +76,16 @@ SYMBOL: dh-file "pastebin" add-responder "planet" add-responder + main-responder set-global ; : init-production ( -- ) common-configuration - "concatenative.org" add-responder - "paste.factorcode.org" add-responder - "planet.factorcode.org" add-responder + "concatenative.org" add-responder + "paste.factorcode.org" add-responder + "planet.factorcode.org" add-responder main-responder set-global ;