mirror of
https://github.com/dimitri/pgloader.git
synced 2025-08-08 07:16:58 +02:00
The portable :external-format name seems to be :utf-8
This commit is contained in:
parent
d2b040f197
commit
3e9d8c0468
4
csv.lisp
4
csv.lisp
@ -33,7 +33,7 @@ Finally returns how many rows where read and processed."
|
||||
;; we just ignore files that don't exist
|
||||
(input filename
|
||||
:direction :input
|
||||
:external-format :utf8
|
||||
:external-format :utf-8
|
||||
:if-does-not-exist nil)
|
||||
(when input
|
||||
;; read in the text file, split it into columns, process NULL columns
|
||||
@ -169,7 +169,7 @@ Finally returns how many rows where read and processed."
|
||||
;; we just ignore files that don't exist
|
||||
(input filename
|
||||
:direction :input
|
||||
:external-format :utf8
|
||||
:external-format :utf-8
|
||||
:if-does-not-exist nil)
|
||||
(when input
|
||||
(loop
|
||||
|
@ -273,7 +273,7 @@ GROUP BY table_name, index_name;" dbname)))
|
||||
(with-open-file (text-file filename
|
||||
:direction :output
|
||||
:if-exists :supersede
|
||||
:external-format :utf8)
|
||||
:external-format :utf-8)
|
||||
(map-rows dbname table-name
|
||||
:process-row-fn
|
||||
(lambda (row)
|
||||
|
@ -78,7 +78,7 @@
|
||||
(with-open-file (csv filename
|
||||
:direction :output
|
||||
:if-exists :supersede
|
||||
:external-format :utf8)
|
||||
:external-format :utf-8)
|
||||
(loop
|
||||
for count from 1
|
||||
for row = (cl-mysql:next-row q :type-map (make-hash-table))
|
||||
|
Loading…
Reference in New Issue
Block a user