mirrors/pgloader
1
0
Fork 0
mirror of https://github.com/dimitri/pgloader.git synced 2026-05-05 02:46:10 +02:00
Code Issues Projects Releases Wiki Activity

In passing aesthetic concerns.

Browse Source
This commit is contained in:
Dimitri Fontaine 2017-01-23 21:49:42 +01:00
parent 1d35290914
commit c0f9569ddd
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/sources/common/casting-rules.lisp
View File

@ -109,7 +109,9 @@
:type-name type-name
:type-mod (when (and source-typemod (not drop-typemod))
pg-typemod)
:nullable (and (not set-not-null) (or (not source-not-null) drop-not-null))
:nullable (and (not set-not-null)
(or (not source-not-null)
drop-not-null))
:default (when (and source-default (not drop-default))
source-default)
:transform using)))
@ -151,7 +153,7 @@
(setf first-match-using using))
:until target
:finally (let ((coldef (make-pgsql-type source target using)))
(log-message :info "CAST ~a.~a ~a [~s, ~:[NULL~;NOT NULL~]~:[~*~;, ~a~]] TO ~s~@[ USING ~a~]"
(log-message :info "CAST ~a.~a ~a [~s, ~:[NULL~;NOT NULL~]~:[~*~;, ~a~]] TO ~a~@[ USING ~a~]"
table-name column-name ctype default
(string= "NO" nullable)
(string/= "" extra) extra