@@ -211,6 +211,7 @@ data ReaderOptions = ReaderOptions{
211211 -- indented code blocks
212212 , readerDefaultImageExtension :: String -- ^ Default extension for images
213213 , readerTrace :: Bool -- ^ Print debugging info
214+ , readerTrackChanges :: TrackChanges
214215} deriving (Show, Read)
215216
216217instance Default ReaderOptions
@@ -227,6 +228,7 @@ instance Default ReaderOptions
227228 , readerIndentedCodeClasses = []
228229 , readerDefaultImageExtension = ""
229230 , readerTrace = False
231+ , readerTrackChanges = AcceptChanges
230232 }
231233
232234--