diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-04-09 11:08:06 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-04-09 11:08:06 +0200 |
| commit | 43be95c40a433d21f65c9e6bfb04ccc9fa8e2db4 (patch) | |
| tree | 0372ea1e75324d32722de7a1ffe8246009665028 /bin | |
| parent | 2f37403606d31b7b9bfe68c57665d41faaa1d100 (diff) | |
| download | cuirass-43be95c40a433d21f65c9e6bfb04ccc9fa8e2db4.tar cuirass-43be95c40a433d21f65c9e6bfb04ccc9fa8e2db4.tar.gz | |
Use the 2.2 'setvbuf' API style.
* bin/cuirass.in (main): Use the 2.2 'setvbuf' API style.
* examples/guix-track-git.scm (current-error-port): Likewise.
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/cuirass.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/cuirass.in b/bin/cuirass.in index d27167c..b7c9144 100644 --- a/bin/cuirass.in +++ b/bin/cuirass.in @@ -79,8 +79,8 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@" (define* (main #:optional (args (command-line))) ;; Always have stdout/stderr line-buffered. - (setvbuf (current-output-port) _IOLBF) - (setvbuf (current-error-port) _IOLBF) + (setvbuf (current-output-port) 'line) + (setvbuf (current-error-port) 'line) (let ((opts (getopt-long args %options))) (parameterize |