                           :value "Save app",
                           :type "submit"
                           :on-click #(do
-                                      (put! controls-ch [:saved-project-settings {:project-id project-id
-                                                                                  :merge-paths [[:aws :services :codedeploy]]}])
+                                      (raise! owner [:edited-input {:path (input-path app-name :revision_location :revision_type) :value "S3"}])
+                                      (raise! owner [:saved-project-settings {:project-id project-id
+                                                                              :merge-paths [[:aws :services :codedeploy]]}])
                                       false)}])
            (forms/managed-button
             [:input.remove {:data-failed-text "Failed",

           [:div.input-with-help
            [:input#s3-bucket
             {:required true, :type "text", :value (or bucket "")
              :on-change #(utils/edit-input controls-ch (input-path app-name :revision_location :bucket) %)}]
            [:label {:placeholder "Bucket Name"}]
            [:i.fa.fa-question-circle#bucket-popover-hack {:title "S3 Bucket Name"}]]

           [:div.input-with-help
            [:input#s3-key-prefix
             {:required true, :type "text", :value (or key_pattern "")
              :on-change #(utils/edit-input controls-ch (input-path app-name :revision_location :key_pattern) %)}]
            [:label {:placeholder "Key Pattern"}]
            [:i.fa.fa-question-circle#key-pattern-popover-hack {:title "S3 Key Pattern"}]]]


                      "        application_root: /\n"
                      "        region: us-east-1\n"
                      "        revision_location:\n"
                      "          revision_type: S3\n"
                      "          s3_location:\n"
                      "            bucket: my-bucket\n"
                      "            key_pattern: appname-1234-{BRANCH}-{SHORT_COMMIT}\n"
                      "        deployment_group: my-deployment-group\n"))]]]]])))))

(defn follow-sidebar [project owner]
