Add a notice message with guessed parameters.

We might have to help users debug our decision, and I expect we will have to
improve our guess “engine” here.
This commit is contained in:
Dimitri Fontaine 2017-07-07 02:34:23 +02:00
parent 471f2b6d88
commit cf6182fafa

View File

@ -86,7 +86,14 @@
(guess-csv-params stream nb-columns)
(setf separator sep
quote q
escape esc))))
escape esc)
(log-message :notice "Guessed following CSV parameters:~% ~a"
(format nil "~
fields terminated by '~a',
fields optionally enclosed by '~a',
fields escaped by '~a'"
sep q esc)))))
(handler-case
(handler-bind ((cl-csv:csv-parse-error