Another try at fixing #40.

The babel character-decoding-error condition is exposing both its
internal BUFFER and the current OCTETS, and it seems we should refer to
the BUFFER in our error reporting...
This commit is contained in:
Dimitri Fontaine 2014-03-04 15:54:31 +01:00
parent 654b3f5531
commit 114d2fedbc

View File

@ -90,7 +90,7 @@
(let ((encoding (babel-encodings:character-coding-error-encoding c))
(position (babel-encodings:character-coding-error-position c))
(character
(aref (babel-encodings:character-decoding-error-octets c)
(aref (babel-encodings:character-coding-error-buffer c)
(babel-encodings:character-coding-error-position c))))
(log-message :error
"~a: Illegal ~a character starting at position ~a: ~a."