From 25df1f96145768c374918e17f79359ec6a81d03b Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Mon, 29 Sep 2008 23:04:14 -0500
Subject: [PATCH] Tweak config
---
.../websites/concatenative/concatenative.factor | 17 +++++++++--------
1 file changed, 9 insertions(+), 8 deletions(-)
diff --git a/extra/websites/concatenative/concatenative.factor b/extra/websites/concatenative/concatenative.factor
index 0af8eb31d7..0fec239743 100644
--- a/extra/websites/concatenative/concatenative.factor
+++ b/extra/websites/concatenative/concatenative.factor
@@ -45,7 +45,7 @@ TUPLE: factor-website < dispatcher ;
<boilerplate>
{ factor-website "page" } >>template ;
-: <configuration> ( responder -- responder' )
+: <login-config> ( responder -- responder' )
"Factor website" <login-realm>
"Factor website" >>name
allow-registration
@@ -77,10 +77,10 @@ SYMBOL: dh-file
"password" key-password set-global
common-configuration
<factor-website>
- <pastebin> <factor-boilerplate> "pastebin" add-responder
- <planet> <factor-boilerplate> "planet" add-responder
+ <pastebin> <factor-boilerplate> <login-config> "pastebin" add-responder
+ <planet> <factor-boilerplate> <login-config> "planet" add-responder
"/tmp/docs/" <help-webapp> "docs" add-responder
- <configuration>
+ test-db <alloy>
main-responder set-global ;
: <gitweb> ( path -- responder )
@@ -91,11 +91,12 @@ SYMBOL: dh-file
: init-production ( -- )
common-configuration
<vhost-dispatcher>
- <factor-website> <factor-boilerplate> <configuration> "concatenative.org" add-responder
- <pastebin> <factor-boilerplate> <configuration> "paste.factorcode.org" add-responder
- <planet> <factor-boilerplate> <configuration> "planet.factorcode.org" add-responder
- home "docs" append-path <help-webapp> <configuration> "docs.factorcode.org" add-responder
+ <factor-website> <login-config> <factor-boilerplate> "concatenative.org" add-responder
+ <pastebin> <login-config> <factor-boilerplate> "paste.factorcode.org" add-responder
+ <planet> <login-config> <factor-boilerplate> "planet.factorcode.org" add-responder
+ home "docs" append-path <help-webapp> "docs.factorcode.org" add-responder
home "cgi" append-path <gitweb> "gitweb.factorcode.org" add-responder
+ test-db <alloy>
main-responder set-global ;
: <factor-secure-config> ( -- config )