     (fn [r]
       (let [recompile? (-> r :params :recompile)]
         (cond
-          (compiling? gist-id) (render-compiling)
+          (compiling? gist-id) (if recompile?
+                                 (redirect (str "/" login "/" gist-id))
+                                 (render-compiling))
 
           (and (in-s3? gist-id)
                (not recompile?))

         [:section
          [:h1 ns]
          [:p (format-doc doc)]]
         (if (:success compile-res)
           [:section
            [:iframe {:src sketch-url}]
            [:div.controls

               (if (< (util/ms-since created) (* 1000 60 60 24))
                 (str  (util/timeago created) " ago")
                 (str "on " (util/format-ms created "MMM dd, yyyy")))]
              "."]]])
         [:section
          [:pre {:class "brush: clojure"}
           (when source
