aboutsummaryrefslogtreecommitdiff
path: root/src/clojure/contrib/sql.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/clojure/contrib/sql.clj')
-rw-r--r--src/clojure/contrib/sql.clj4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clojure/contrib/sql.clj b/src/clojure/contrib/sql.clj
index 77ea1e60..b3c61ae7 100644
--- a/src/clojure/contrib/sql.clj
+++ b/src/clojure/contrib/sql.clj
@@ -55,13 +55,13 @@
"Marks the outermost transaction such that it will rollback rather than
commit when complete"
[]
- (rollback-only true))
+ (rollback true))
(defn is-rollback-only
"Returns true if the outermost transaction will rollback rather than
commit when complete"
[]
- (rollback-only))
+ (rollback))
(defn do-commands
"Executes SQL commands on the open database connection."