State: integrate default query

1 files changed, 1 insertions, 0 deletions

diff --git a/State.hs b/State.hs
index abd25b0..21c0122 100644
--- a/State.hs
+++ b/State.hs
@@ -20,6 +20,7 @@ data State = State
     , treeBuffer :: [Blessings String]
     , now :: UTCTime
     , signalHandlers :: [(Signal, IO ())]
+    , query :: String
     , keymap :: String -> State -> IO State
     , mousemap :: Scan -> State -> IO State
     , tagSymbols :: [(T.Text, T.Text)]