Skip to content

Commit

Permalink
Merge branch 'hotfix/1.0.1'
Browse files Browse the repository at this point in the history
  • Loading branch information
amalloy committed May 20, 2011
2 parents e0a84a5 + 49b0d37 commit 33e8030
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion project.clj
@@ -1,4 +1,4 @@
(defproject foreclojure "1.0.0" (defproject foreclojure "1.0.1"
:description "4clojure - a website for lisp beginners" :description "4clojure - a website for lisp beginners"
:dependencies [[clojure "1.2.1"] :dependencies [[clojure "1.2.1"]
[clojure-contrib "1.2.0"] [clojure-contrib "1.2.0"]
Expand Down
2 changes: 1 addition & 1 deletion src/foreclojure/problems.clj
Expand Up @@ -101,7 +101,7 @@
(update! :problems {:_id problem-id} {:$inc {:times-solved 1}}) (update! :problems {:_id problem-id} {:$inc {:times-solved 1}})
(send total-solved inc)) (send total-solved inc))
(record-golf-score! user-id problem-id (code-length code)) (record-golf-score! user-id problem-id (code-length code))
(save-solution (? user-id) (? problem-id) (? code)))) (save-solution user-id problem-id code)))


(defn mark-completed [problem code & [user]] (defn mark-completed [problem code & [user]]
(let [user (or user (session/session-get :user)) (let [user (or user (session/session-get :user))
Expand Down

0 comments on commit 33e8030

Please sign in to comment.