X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=Rakka%2FWiki%2FInterpreter.hs;h=32e1a3aa0e1760516d67e533b2fdb59a1942df43;hb=dc29dc9081156af3b536b19ffd828cdd67ddd84a;hp=2a830b36de093415a7a74ce84d68ab24de859d1a;hpb=b3c3f333cd48bc74eb33f0f21d56a9d1bc65e0ea;p=Rakka.git

diff --git a/Rakka/Wiki/Interpreter.hs b/Rakka/Wiki/Interpreter.hs
index 2a830b3..32e1a3a 100644
--- a/Rakka/Wiki/Interpreter.hs
+++ b/Rakka/Wiki/Interpreter.hs
@@ -11,6 +11,7 @@ import           Rakka.Page
 import           Rakka.Storage
 import           Rakka.SystemConfig
 import           Rakka.Wiki
+import           Text.XML.HXT.DOM.TypeDefs
 
 
 data Interpreter
@@ -26,10 +27,12 @@ data Interpreter
 
 data InterpreterContext
     = InterpreterContext {
-        ctxPageName :: !PageName
-      , ctxTree     :: !WikiPage
-      , ctxStorage  :: !Storage
-      , ctxSysConf  :: !SystemConfig
+        ctxPageName   :: !(Maybe PageName)
+      , ctxMainPage   :: !(Maybe XmlTree)
+      , ctxMainWiki   :: !(Maybe WikiPage)
+      , ctxTargetWiki :: !WikiPage
+      , ctxStorage    :: !Storage
+      , ctxSysConf    :: !SystemConfig
       }