mirror of
https://github.com/dimitri/pgloader.git
synced 2026-05-04 10:31:02 +02:00
Fix --upgrade-config basic usage.
This commit is contained in:
parent
f5fc5cce73
commit
d00837f8fc
@ -192,7 +192,12 @@
|
||||
(when upgrade-config
|
||||
(loop for filename in arguments
|
||||
do
|
||||
(pgloader.ini:convert-ini-into-commands filename)
|
||||
(handler-case
|
||||
(with-monitor ()
|
||||
(pgloader.ini:convert-ini-into-commands filename))
|
||||
(condition (c)
|
||||
(when debug (invoke-debugger c))
|
||||
(uiop:quit 1)))
|
||||
(format t "~%~%"))
|
||||
(uiop:quit))
|
||||
|
||||
|
||||
@ -237,7 +237,7 @@
|
||||
(loop
|
||||
for (param option section default)
|
||||
in `((:host "host" ,*global-section* ,*pgconn-host*)
|
||||
(:port "port" ,*global-section* ,*pgconn-port*)
|
||||
(:port "port" ,*global-section* ,(format nil "~d" *pgconn-port*))
|
||||
(:user "user" ,*global-section* ,*pgconn-user*)
|
||||
(:pass "pass" ,*global-section* ,*pgconn-pass*)
|
||||
(:dbname "base" ,*global-section* nil))
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user