5 import Graphics.UI.WXCore.Db
8 getCurrent :: String -> IO String
10 --Keyword -> (id,date)
11 getList :: String -> IO (Int, String)
13 --Keyword -> id -> Full Text
14 get :: String -> Int -> IO String
17 setCurrent :: String -> Int -> IO ()
19 --Keyword -> Full text -> id
20 addNew :: String -> String -> IO Int