From 6347d6fbb823ea9545d335cc46023cd19fbef743 Mon Sep 17 00:00:00 2001
From: Filip Gralinski <filipg@amu.edu.pl>
Date: Tue, 3 Mar 2020 10:01:39 +0100
Subject: [PATCH] Fix showing line-by-line in variants

---
 Handler/Query.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/Handler/Query.hs b/Handler/Query.hs
index 1061f39..7b572eb 100644
--- a/Handler/Query.hs
+++ b/Handler/Query.hs
@@ -280,7 +280,10 @@ viewOutput entry tests (outputHash, testSet) = do
                        gesGonitoHost = Nothing,
                        gesToken = Nothing,
                        gesGonitoGitAnnexRemote = Nothing,
-                       gesReferences = Nothing }
+                       gesReferences = Nothing,
+                       gesBootstrapResampling = Nothing,
+                       gesInHeader = Nothing,
+                       gesOutHeader = Nothing }
 
                  result <- liftIO $ runLineByLineGeneralized FirstTheWorst spec (\_ -> CL.take 20)