aboutsummaryrefslogtreecommitdiff
path: root/State.hs
diff options
context:
space:
mode:
Diffstat (limited to 'State.hs')
-rw-r--r--State.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/State.hs b/State.hs
index 57b6258..a3fbef0 100644
--- a/State.hs
+++ b/State.hs
@@ -40,6 +40,9 @@ data IndexState = IndexState {
selectedRowIn :: Int
, selectedEmail :: Message
, selectedEmails :: [(String, [Flag], String)]
+ , scrollRowIn :: Int
+ , currentInLen :: Int
+ , scrollBufferIn :: [(String, [Flag], String)]
}
data ComposeState = ComposeState {
@@ -77,6 +80,9 @@ initialIndexState = IndexState {
selectedRowIn = 0
, selectedEmail = Message [] "Dummy email"
, selectedEmails = []
+ , scrollRowIn = 0
+ , currentInLen = 0
+ , scrollBufferIn = []
}
initialComposeState = ComposeState {
nihil fit ex nihilo