add matching helper
This commit is contained in:
parent
17dbbce0d2
commit
2f99103ed1
1 changed files with 12 additions and 3 deletions
|
|
@ -314,14 +314,23 @@
|
||||||
(generic :with-columns args)))
|
(generic :with-columns args)))
|
||||||
|
|
||||||
(defn create-view
|
(defn create-view
|
||||||
"Accepts a single view name to create.
|
" Accepts a single view name to create.
|
||||||
|
|
||||||
(-> (create-view :cities)
|
(-> (create-view :cities)
|
||||||
(select :*) (from :city))"
|
(select :*) (from :city)) "
|
||||||
{:arglists '([view])}
|
{:arglists '([view])}
|
||||||
[& args]
|
[& args]
|
||||||
(generic :create-view args))
|
(generic :create-view args))
|
||||||
|
|
||||||
|
(defn create-or-replace-view
|
||||||
|
"Accepts a single view name to create.
|
||||||
|
|
||||||
|
(-> (create-or-replace-view :cities)
|
||||||
|
(select :*) (from :city))"
|
||||||
|
{:arglists '([view])}
|
||||||
|
[& args]
|
||||||
|
(generic :create-or-replace-view args))
|
||||||
|
|
||||||
(defn create-materialized-view
|
(defn create-materialized-view
|
||||||
"Accepts a single view name to create.
|
"Accepts a single view name to create.
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue