Export more practical stuff in the main package, and make run-command smarter.

This commit is contained in:
Dimitri Fontaine 2013-10-03 21:00:16 +02:00
parent b4c9ca0571
commit 005b33d99f
2 changed files with 5 additions and 0 deletions

View File

@ -152,6 +152,9 @@
#:*myconn-port*
#:*myconn-user*
#:*myconn-pass*
#:run-command
#:parse-command
#:slurp-file-into-string
#:copy-from-file
#:list-databases
#:list-tables))

View File

@ -1319,6 +1319,8 @@ Here's a quick description of the format we're parsing here:
(typecase command
(function command)
(list (compile nil command))
(pathname (compile nil (parse-command
(slurp-file-into-string command))))
(t (compile nil (parse-command command))))))
;; Start the logger