Add ability to order by jsonb keys, fix #644

2016-10-05 14:46:12 -05:00
parent 980680f3d6
commit 191601f129
6 changed files with 15 additions and 4 deletions
@@ -306,7 +306,7 @@ requestToQuery schema isParent (DbRead (Node (Select colSelects tbls conditions
            clause = intercalate "," (map queryTerm ts)
            queryTerm :: OrderTerm -> Text
            queryTerm t = " "
-                <> toS (pgFmtColumn qi $ otTerm t) <> " "
+                <> toS (pgFmtField qi $ otTerm t) <> " "
                <> maybe "" show (otDirection t) <> " "
                <> maybe "" show (otNullOrder t) <> " "
    (joins, selects) = foldr getQueryParts ([],[]) forest