diff --git a/resources/templates/roles/canvasser.html b/resources/templates/roles/canvasser.html
index a16ad90..38fc513 100644
--- a/resources/templates/roles/canvasser.html
+++ b/resources/templates/roles/canvasser.html
@@ -1,9 +1,15 @@
 {% extends "base.html" %}
 {% block big-links %}
       <div class="big-link-container">
-        <a href="{{servlet-context}}/profile" class="big-link" id="profile-link">Your&nbsp;profile</a>
+        <a href="{{servlet-context}}/profile"
+           class="big-link" id="profile-link">Your&nbsp;profile</a>
       </div>
       <div class="big-link-container">
-        <a href="{{servlet-context}}/app" class="big-link" id="app-link">App</a>
+        <a href="{{servlet-context}}/app"
+           class="big-link" id="app-link">App</a>
+      </div>
+      <div class="big-link-container">
+        <a href="https://steamie.projecthope.scot/"
+           class="big-link" id="app-link">Steamie</a>
       </div>
 {% endblock %}
diff --git a/src/clj/youyesyet/routes/home.clj b/src/clj/youyesyet/routes/home.clj
index 896e7e1..2f37538 100644
--- a/src/clj/youyesyet/routes/home.clj
+++ b/src/clj/youyesyet/routes/home.clj
@@ -79,7 +79,9 @@
         username (:username params)
         user (if username (db-core/get-canvasser-by-username db-core/*db* {:username username}))
         password (:password params)
-        redirect-to (or (:redirect-to params) "roles")]
+        redirect-to (or
+                     (:redirect-to params)
+                     (str (:servlet-context request) "/roles"))]
     (cond
      (:authority params)
      (let [auth (oauth/authority! (:authority params))]
@@ -126,7 +128,7 @@
   (POST "/call-me" request (call-me-page request))
   (GET "/login" request (login-page request))
   (POST "/login" request (login-page request))
-  (GET "/notyet" [] (layout/render "notyet.html" {}
+  (GET "/notyet" [] (layout/render "notyet.html"
                                    {:title "Can we persuade you?"}))
-  (GET "/supporter" [] (layout/render "supporter.html" {}
+  (GET "/supporter" [] (layout/render "supporter.html"
                                       {:title "Have you signed up as a canvasser yet?"})))