ibdknox/Korma — pull request #57 by mw10013 (2012-04-24 01:37:54+00:00)
Title: korma.db/->strategy returns :entity instead of :identifier

java.jdbc naming-strategy uses :entity, not :identifier.

https://github.com/clojure/java.jdbc/blob/java.jdbc-0.1.3/src/main/clojure/clojure/java/jdbc.clj

(defmacro with-naming-strategy
"Evaluates body in the context of a naming strategy.
The naming strategy is either a function - the entity naming strategy - or
a map containing :entity and/or :keyword keys which provide the entity naming
strategy and/or the keyword naming strategy respectively. The default entity
naming strategy is identity; the default keyword naming strategy is lower-case."
[naming-strategy & body ]
`(binding [*as-str* (if (map? ~naming-strategy) (or (:entity ~naming-strategy) identity) ~naming-strategy)
*as-key* (if (map? ~naming-strategy) (or (:keyword ~naming-strategy) clojure.string/lower-case))] ~@body))