From deddb2d82eac86f9254237f4931cdae0d422f4b5 Mon Sep 17 00:00:00 2001
From: Timothy Clem <timothy.clem@gmail.com>
Date: Tue, 26 Feb 2019 09:31:30 -0800
Subject: [PATCH] Less noisy logging

---
 src/Semantic/Config.hs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/Semantic/Config.hs b/src/Semantic/Config.hs
index f1d6ea4d9..b9c8281e0 100644
--- a/src/Semantic/Config.hs
+++ b/src/Semantic/Config.hs
@@ -6,6 +6,7 @@ module Semantic.Config
   , Options (..)
   , defaultOptions
   , debugOptions
+  , infoOptions
   , lookupStatsAddr
   , withHaystackFromConfig
   , logOptionsFromConfig
@@ -63,6 +64,9 @@ defaultOptions = Options (Just Warning) False False
 debugOptions :: Options
 debugOptions = Options (Just Debug) False False
 
+infoOptions :: Options
+infoOptions = Options (Just Info) False False
+
 defaultConfig :: Options -> IO Config
 defaultConfig options@Options{..} = do
   pid <- getProcessID