sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Set coding-system-for-read, as well as write

Browse source
This commit is contained in:
John Wiegley 2009-02-13 05:38:45 -04:00
parent 10ba30ddfd
commit 51e0bc8a82
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ledger.el
View file

@ -1289,7 +1289,8 @@ This is done so that the last digit falls in COLUMN, which defaults to 52."
(t (t
(let ((buf (current-buffer))) (let ((buf (current-buffer)))
(with-current-buffer buffer (with-current-buffer buffer
(let ((coding-system-for-write 'utf-8)) (let ((coding-system-for-write 'utf-8)
(coding-system-for-read 'utf-8))
(apply #'call-process-region (apply #'call-process-region
(append (list (point-min) (point-max) (append (list (point-min) (point-max)
ledger-binary-path ledger-delete-after ledger-binary-path ledger-delete-after