webapps.mason: redirect index to dashboard. Fix #178.

diff --git a/extra/webapps/mason/mason.factor b/extra/webapps/mason/mason.factor
index 06f09af6edf559f464075c4fb91430c233dcf97c..4ca42b794432a041bcff785fb569eaaa032ea893 100644 (file)
--- a/extra/webapps/mason/mason.factor
+++ b/extra/webapps/mason/mason.factor
@@ -1,8 +1,9 @@
 ! Copyright (C) 2009, 2010 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors furnace.actions furnace.auth furnace.db
-http.server.dispatchers webapps.mason.backend webapps.mason.grids
-webapps.mason.package webapps.mason.release webapps.mason.report
+furnace.redirection http.server.dispatchers urls
+webapps.mason.backend webapps.mason.grids webapps.mason.package
+webapps.mason.release webapps.mason.report
 webapps.mason.downloads webapps.mason.counter
 webapps.mason.status-update webapps.mason.docs-update
 webapps.mason.dashboard webapps.mason.make-release
@@ -57,4 +58,9 @@ build-engineer? define-capability
         <increment-counter-action> <mason-protected>
             "increment-counter" add-responder
 
-    "dashboard" add-responder ;
+        "dashboard" add-responder
+
+    <action>
+        [ URL" $mason-app/dashboard" <redirect> ] >>display
+        "" add-responder
+    ;