Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

updating to latest burp and making it possible to nest the survey usi…

…ng relative links
  • Loading branch information...
commit b4637890f29aecc2e38bfebc5764e4732ad1fd6a 1 parent 047c40c
Mark Fredrickson authored
2  project.clj
@@ -5,7 +5,7 @@
5 5 [ring "0.3.11"]
6 6 [compojure "0.6.4"]
7 7 [hiccup "0.3.6"]
8   - [burp "0.1.3"]]
  8 + [burp "0.1.4"]]
9 9 :dev-dependencies [[ring-serve "0.1.1"]
10 10 [appengine-magic "0.4.4"]
11 11 [ring-mock "0.1.1"]])
4 src/shanks/core.clj
@@ -90,7 +90,7 @@ Options are of the form: {:name1 \"Label1\" :name2 \"Label2\" ...}"
90 90 (defn screen-form
91 91 "Wrap a screen in a form"
92 92 [scrn subject]
93   - (f/form-to [:post "/"]
  93 + (f/form-to [:post ""]
94 94 (f/hidden-field :id (:id subject))
95 95 (scrn subject)
96 96 (f/submit-button "Continue")))
@@ -134,6 +134,6 @@ Returns an app suitable for use with the ring framework."
134 134 ; remains numeric.
135 135 {:step (inc step) :id (:id subject)})
136 136 [:timestamp step :finish] (Date.)))
137   - (rur/redirect (str "/?id=" (:id subject))))))
  137 + (rur/redirect (str "?id=" (:id subject))))))
138 138 (ch/site)))
139 139
4 test/shanks/demo/core.clj
@@ -3,7 +3,7 @@
3 3 ring.middleware.file
4 4 [clojure.java.io :only [resource]]
5 5 burp.ring
6   - [burp.jquery :only (jquery-link jquery-ui-link)]
  6 + [burp.jquery :only (jquery-link jquery-ui-link jquery-support-link jquery-ui-support-link)]
7 7 [hiccup.page-helpers :only (xhtml include-js include-css)]))
8 8
9 9 (defscreen ice-cream-preferences
@@ -37,7 +37,7 @@
37 37 [:head
38 38 [:title "Demo Survey"]
39 39 (jquery-link) (jquery-ui-link)
40   - (include-js "burp.jquery.ui.support.js")]
  40 + (jquery-support-link) (jquery-ui-support-link)]
41 41 [:body
42 42 (if (not (= thanks screen))
43 43 (list

0 comments on commit b463789

Please sign in to comment.
Something went wrong with that request. Please try again.