Permalink
Browse files

Merge commit '8a9f2f8a0a7683fa0bad8bf33f209cb915e2ce3c'

  • Loading branch information...
amalloy committed Aug 5, 2012
2 parents db9497b + 8a9f2f8 commit 4025609e1c373bf45e19151be47c8b74b701e07e
Showing with 4 additions and 10 deletions.
  1. +2 −2 project.clj
  2. +2 −8 src/foreclojure/problems.clj
View
@@ -1,9 +1,9 @@
-(defproject foreclojure "2.0.0-alpha1"
+(defproject foreclojure "2.0.0-alpha2"
:description "4clojure - a website for learning Clojure"
:dependencies [[org.clojure/clojure "1.4.0"]
[compojure "1.1.0"]
[hiccup "1.0.0"]
- [clojail "0.6.0"]
+ [clojail "0.5.1"]
[lib-noir "0.1.1"]
[congomongo "0.1.9"]
[org.jasypt/jasypt "1.7"]
@@ -14,7 +14,7 @@
[foreclojure.users :only [golfer? get-user-id disable-codebox?]]
[foreclojure.solutions :only [save-solution get-solution]]
[clojail.core :exclude [safe-read]]
- [clojail.testers :only [secure-tester blanket]]
+ [clojail.testers :only [secure-tester]]
[somnium.congomongo :only [update! fetch-one fetch fetch-and-modify destroy!]]
[hiccup.form :only [form-to text-area hidden-field label text-field drop-down]]
[hiccup.element :only [link-to]]
@@ -162,14 +162,8 @@
(def restricted-list '[use require in-ns future agent send send-off pmap pcalls])
-(def base-tester (blanket secure-tester
- "foreclojure"
- "somnium"
- "ring"
- "compojure"))
-
(defn get-tester [restricted]
- (into base-tester (concat restricted-list (map symbol restricted))))
+ (into secure-tester (concat restricted-list (map symbol restricted))))
(def sb (sandbox*))

0 comments on commit 4025609

Please sign in to comment.