Alex Kost (2015-09-13 22:39 +0300) wrote:

[...]
>  (define (guix-command-output . args)
> -  "Return string with 'guix ARGS ...' output."
> -  (with-output-to-string
> -    (lambda () (apply guix-command args))))
> +  "Return 2 strings with 'guix ARGS ...' output and error output."
> +  (output+error
> +   (lambda ()
> +     (guix-warning-port (current-error-port))
> +     (apply guix-command args))))

Ouch, it should be:

   (lambda ()
     (parameterize ((guix-warning-port (current-error-port)))
       (apply guix-command args)))

-- 
Alex

Reply via email to