summaryrefslogtreecommitdiff
path: root/Types
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-09-11 13:36:28 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-09-11 13:36:28 -0400
commitb0a86d81a39f25f2e57b0e4fd564acc70cbdf850 (patch)
treefca828650876bfe16d6ef24cb0f2a516e1c390d9 /Types
parentde679a571cc4f8bf6a320222697e40900fd962cf (diff)
Promote file not found warning message to an error.
Diffstat (limited to 'Types')
-rw-r--r--Types/Messages.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/Types/Messages.hs b/Types/Messages.hs
index 4fcce79f8..2196028e3 100644
--- a/Types/Messages.hs
+++ b/Types/Messages.hs
@@ -7,8 +7,6 @@
module Types.Messages where
-import qualified Data.Set as S
-
data OutputType = NormalOutput | QuietOutput | JSONOutput
data SideActionBlock = NoBlock | StartBlock | InBlock
@@ -17,8 +15,7 @@ data SideActionBlock = NoBlock | StartBlock | InBlock
data MessageState = MessageState
{ outputType :: OutputType
, sideActionBlock :: SideActionBlock
- , fileNotFoundShown :: S.Set FilePath
}
defaultMessageState :: MessageState
-defaultMessageState = MessageState NormalOutput NoBlock S.empty
+defaultMessageState = MessageState NormalOutput NoBlock