diff options
Diffstat (limited to 'src/clojure/contrib/sql/internal.clj')
-rw-r--r-- | src/clojure/contrib/sql/internal.clj | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/src/clojure/contrib/sql/internal.clj b/src/clojure/contrib/sql/internal.clj index 730bc84b..9d9667ca 100644 --- a/src/clojure/contrib/sql/internal.clj +++ b/src/clojure/contrib/sql/internal.clj @@ -12,17 +12,12 @@ ;; Created 3 October 2008 (ns clojure.contrib.sql.internal - (:use [clojure.contrib.except :only (throw-arg)])) + (:use [clojure.contrib.except :only (throw-arg)] + [clojure.contrib.java-utils :only (the-str)])) (def *db* {:connection nil :level 0}) -(defn the-str - "Returns the name or string representation of x" - [x] - (if (instance? clojure.lang.Named x) - (name x) - (str x))) - +; TODO: test and move to clojure.contrib.java-utils? (defn properties "Converts a map from keywords, symbols, or strings to values into a java.util.Properties object that maps the key names to the values with |