From dc06efe2a49f7927c77040d5d902b907efee393a Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Fri, 14 Oct 2011 15:42:41 -0700
Subject: [PATCH] webapps.mason: redirect index to dashboard. Fix #178.

---
 extra/webapps/mason/mason.factor | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/extra/webapps/mason/mason.factor b/extra/webapps/mason/mason.factor
index 06f09af6ed..4ca42b7944 100644
--- 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
+    ;