projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
remove extra whitespace
[clsql.git]
/
sql
/
operations.lisp
diff --git
a/sql/operations.lisp
b/sql/operations.lisp
index a3f6bbd09fefd79a504f78f95f87e92a1fa4fb3f..3a4638537f3830d5c7a23eb03962e74a257e9c65 100644
(file)
--- a/
sql/operations.lisp
+++ b/
sql/operations.lisp
@@
-74,11
+74,11
@@
(defsql sql-group-by (:symbol "group-by") (&rest rest)
(make-instance 'sql-query-modifier-exp
(defsql sql-group-by (:symbol "group-by") (&rest rest)
(make-instance 'sql-query-modifier-exp
- :modifier '|
group by
| :components rest))
+ :modifier '|
GROUP BY
| :components rest))
(defsql sql-order-by (:symbol "order-by") (&rest rest)
(make-instance 'sql-query-modifier-exp
(defsql sql-order-by (:symbol "order-by") (&rest rest)
(make-instance 'sql-query-modifier-exp
- :modifier '|
order by
| :components rest))
+ :modifier '|
ORDER BY
| :components rest))
(defsql sql-having (:symbol "having") (&rest rest)
(make-instance 'sql-query-modifier-exp
(defsql sql-having (:symbol "having") (&rest rest)
(make-instance 'sql-query-modifier-exp