1
0
Fork 0

don't bother allocating iconv info on pipe

* tekuti/git.scm (run): Don't set encoding on pipe, as we just use
  bytevector io anyway.
This commit is contained in:
Andy Wingo 2011-02-22 23:52:11 +01:00
parent a05d9a5df8
commit efc25df8f4

View file

@ -87,7 +87,6 @@
(let* ((real-args (trc (redirect-input (prepend-env args))))
(pipe (apply open-pipe* OPEN_READ real-args))
(output (begin
(set-port-encoding! pipe "ISO-8859-1")
(let ((bv (get-bytevector-all pipe)))
(if (eof-object? bv)
""