From 9ce323007e2e443c64132aab2749094e88919d65 Mon Sep 17 00:00:00 2001
From: Dimitri Fontaine <dim@tapoueh.org>
Date: Tue, 4 Nov 2014 02:05:19 +0100
Subject: [PATCH] Report the summary to *standard-output*.

There's actually no reason to insist on using the *terminal-io*
directly, that is the pty device.
---
 src/parsers/parser.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/parsers/parser.lisp b/src/parsers/parser.lisp
index 41a8438..6fad972 100644
--- a/src/parsers/parser.lisp
+++ b/src/parsers/parser.lisp
@@ -2262,7 +2262,7 @@ load database
                                      :direction :output
                                      :if-exists :rename
                                      :if-does-not-exist :create)))
-             (*report-stream* (or summary-stream *terminal-io*)))
+             (*report-stream* (or summary-stream *standard-output*)))
         (unwind-protect
              ;; run the commands
              (loop for func in funcs do (funcall func))