diff options
author | 2011-02-22 23:52:11 +0100 | |
---|---|---|
committer | 2011-02-22 23:52:11 +0100 | |
commit | efc25df8f43d59310b55317ac8094206a406fe8f (patch) | |
tree | 3d0011222043432bc5e15b7e275caa92af55f71d | |
parent | a05d9a5df8ed76990eef2b9c17467db801472587 (diff) | |
download | tekuti-efc25df8f43d59310b55317ac8094206a406fe8f.tar.gz tekuti-efc25df8f43d59310b55317ac8094206a406fe8f.zip |
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.
-rw-r--r-- | tekuti/git.scm | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/tekuti/git.scm b/tekuti/git.scm index d2aecb4..fee9c0f 100644 --- a/tekuti/git.scm +++ b/tekuti/git.scm @@ -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) "" |