From 2059118ee2778fb8945ae6ccf33aa3aaba5d3417 Mon Sep 17 00:00:00 2001
From: Igor Pashev <pashev.igor@gmail.com>
Date: Wed, 15 Jun 2016 22:14:47 +0800
Subject: GRANT may have NULL state

---
 src/Application.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Application.hs b/src/Application.hs
index 899893e..d2e7f6b 100644
--- a/src/Application.hs
+++ b/src/Application.hs
@@ -63,7 +63,7 @@ data Process = Process {
   , db      :: Maybe Text
   , command :: Text
   , time    :: Int
-  , state   :: Text
+  , state   :: Maybe Text
   , info    :: Text
 } deriving (Generic)
 instance ToJSON Process
-- 
cgit v1.2.3