diff options
author | Carlo Zancanaro <carlo@clearboxsystems.com.au> | 2013-05-24 10:02:16 +1000 |
---|---|---|
committer | Carlo Zancanaro <carlo@clearboxsystems.com.au> | 2013-05-24 10:02:16 +1000 |
commit | e2bd4b4939d34fc9400c9843b691428d3888ecc4 (patch) | |
tree | 884dff7985b66cbd2ae84153e45d40e8139f5c92 /src/clojure_sql/dsl.clj | |
parent | 5ccaca496f4babb4fef2d34e272b8772e077fa25 (diff) |
Fix a bug in `resolve-fields`
The recursive calls to `resolve-fields` were not being made due to programmer
error. This has been fixed, so now the field resolution stuff should work
properly again.
This is really highlighting the need for better testing. Get on that!
Diffstat (limited to 'src/clojure_sql/dsl.clj')
-rw-r--r-- | src/clojure_sql/dsl.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clojure_sql/dsl.clj b/src/clojure_sql/dsl.clj index 996b55c..8c9c31d 100644 --- a/src/clojure_sql/dsl.clj +++ b/src/clojure_sql/dsl.clj @@ -45,8 +45,8 @@ (ambiguous-error field))))) (defn ^:private resolve-fields [table aliases expression] - (cond (list? expression) (map (partial table aliases) expression) - (vector? expression) (mapv (partial table aliases) expression) + (cond (list? expression) (map (partial resolve-fields table aliases) expression) + (vector? expression) (mapv (partial resolve-fields table aliases) expression) (keyword? expression) (resolve-field table aliases expression) :else expression)) |