5 class WikiBackend a where
7 getCurrent :: a -> String -> IO String
9 --Keyword -> [(id,date)]
10 getList :: a -> String -> IO [(Int, String)]
12 --Keyword -> id -> Full text
13 get :: a -> String -> Int -> IO String
16 setCurrent :: a -> String -> Int -> IO ()
18 --Keyword -> Full text -> id
19 addNew :: String -> String -> IO Int