diff --git a/src/Monocle/Backend/Documents.hs b/src/Monocle/Backend/Documents.hs index 393f7022c..585e075f2 100644 --- a/src/Monocle/Backend/Documents.hs +++ b/src/Monocle/Backend/Documents.hs @@ -339,7 +339,7 @@ data EDocType allEventTypes :: [EDocType] allEventTypes = - filter (`notElem` [EChangeDoc, EOrphanTaskData, ECachedAuthor]) [minBound .. maxBound] + filter (`notElem` [EChangeDoc, EOrphanTaskData, ECachedAuthor, EErrorDoc]) [minBound .. maxBound] instance From EDocType Text where from = \case