Address #334 in part by correcting :arglist

This commit is contained in:
Sean Corfield 2021-06-21 15:17:04 -07:00
parent 8ec08ca686
commit 395ba6a5bd

View file

@ -151,7 +151,7 @@
(add-index :unique :name-key :first-name :last-name) (add-index :unique :name-key :first-name :last-name)
Produces: UNIQUE name_key(first_name, last_name)" Produces: UNIQUE name_key(first_name, last_name)"
{:arglist '([& index-elems])} {:arglists '([& index-elems])}
[& args] [& args]
(generic :add-index args)) (generic :add-index args))
@ -169,7 +169,7 @@
(alter-table :foo (rename-table :bar)) (alter-table :foo (rename-table :bar))
Produces: ALTER TABLE foo RENAME TO bar" Produces: ALTER TABLE foo RENAME TO bar"
{:arglist '([new-table])} {:arglists '([new-table])}
[& args] [& args]
(generic-1 :rename-table args)) (generic-1 :rename-table args))
@ -375,14 +375,14 @@
(defn into (defn into
"Accepts table name, optionally followed a database name." "Accepts table name, optionally followed a database name."
{:arglist '([table] [table dbname])} {:arglists '([table] [table dbname])}
[& args] [& args]
(generic :into args)) (generic :into args))
(defn bulk-collect-into (defn bulk-collect-into
"Accepts a variable name, optionally followed by a limit "Accepts a variable name, optionally followed by a limit
expression." expression."
{:arglist '([varname] [varname n])} {:arglists '([varname] [varname n])}
[& args] [& args]
(generic :bulk-collect-into args)) (generic :bulk-collect-into args))