From 846c2964cba965570c05dc0e5e8ab286025685b2 Mon Sep 17 00:00:00 2001
From: Filip Gralinski <filipg@amu.edu.pl>
Date: Sun, 19 Feb 2017 16:11:59 +0100
Subject: [PATCH] fix warning

---
 Handler/Query.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/Handler/Query.hs b/Handler/Query.hs
index d6b48c8..a851aee 100644
--- a/Handler/Query.hs
+++ b/Handler/Query.hs
@@ -66,7 +66,6 @@ processQuery :: Text -> Handler Html
 processQuery query = do
   submissions <- findSubmissions query
   defaultLayout $ do
-    aDomId <- newIdent
     setTitle "query results"
     $(widgetFile "query-results")