mirrors/pgloader
1
0
Fork 0
mirror of https://github.com/dimitri/pgloader.git synced 2025-08-08 23:37:00 +02:00
Code Issues Projects Releases Wiki Activity

Fix the condition handler fix for #40.

Browse Source 
Refrain from trying to display the character where we found a decoding
error when the error actually happens at end-of-input-in-character...
This commit is contained in:
Dimitri Fontaine 2014-03-04 14:20:27 +01:00
parent 56f3da28ed
commit 654b3f5531
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/sources/mysql.lisp
View File

@ -78,7 +78,13 @@
(pgstate-incf *state* (target mysql) :read 1) (pgstate-incf *state* (target mysql) :read 1)
(funcall process-row-fn row)))) (funcall process-row-fn row))))
(handler-bind (handler-bind
((babel-encodings:character-decoding-error ;; avoid trying to fetch the character at end-of-input position...
((babel-encodings:end-of-input-in-character
#'(lambda (c)
(pgstate-incf *state* (target mysql) :errs 1)
(log-message :error "~a" c)
(invoke-restart 'qmynd-impl::use-nil)))
(babel-encodings:character-decoding-error
#'(lambda (c) #'(lambda (c)
(pgstate-incf *state* (target mysql) :errs 1) (pgstate-incf *state* (target mysql) :errs 1)
(let ((encoding (babel-encodings:character-coding-error-encoding c)) (let ((encoding (babel-encodings:character-coding-error-encoding c))