[server] rendering some templates within infobox

also adjusted the parsers to not have overlapping skipspace

1 files changed, 2 insertions, 3 deletions

diff --git a/src/Servall/Types.hs b/src/Servall/Types.hs
index ae4f73a..2c49532 100644
--- a/src/Servall/Types.hs
+++ b/src/Servall/Types.hs
@@ -9,14 +9,13 @@ import           Data.Aeson                     ( (.:)
                                                 , Value(..)
                                                 , object
                                                 )
-import qualified Data.HashMap.Lazy             as HM
 import           Data.Text                      ( Text )
 import           GHC.Generics                   ( Generic )
 
 data WikiTemplate = WikiTemplate
-  { wtName   :: Text
+  { wtName :: Text
   -- , wtSubName :: Maybe Text
-  , wtFields :: HM.HashMap Text Text
+  , wtArgs :: [(Maybe Text, Text)]
   }
   deriving Show