diff --git a/Main.hs b/Main.hs
--- a/Main.hs
+++ b/Main.hs
@@ -5,4 +5,9 @@
 import Villefort.Config
 
 main :: IO ()
-main = villefort def 
+main = villefort def {
+  database= "/home/chris/data/todo.db"
+  }
+
+nosugar :: IO [String]
+nosugar = pure ["SD","S","S"]
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -1,7 +1,8 @@
 # Villefort
 Villefort is a time managment system written in Haskell.
 
-## Version 1.2.6
+## Version 1.2.7
+- Fixed errors with Versions 1.2.6's core api.
 - Made log github graph reflect actual time on task.
 - removed predicted time field on main page.
 - Started writing tests.
diff --git a/Villefort.cabal b/Villefort.cabal
--- a/Villefort.cabal
+++ b/Villefort.cabal
@@ -1,5 +1,5 @@
 name:                Villefort
-version:             0.1.2.6
+version:             0.1.2.7
 synopsis: Villefort is a task manager and time tracker written in haskell.
 description: Villefort is a browser based time tracker.
 homepage:            https://github.com/Chrisr850/Villefort#readme
diff --git a/src/Villefort/Todo.hs b/src/Villefort/Todo.hs
--- a/src/Villefort/Todo.hs
+++ b/src/Villefort/Todo.hs
@@ -29,12 +29,11 @@
                  description :: String,
                  due :: String,
                  subject :: String,
-                 time :: Int,
-                 pred :: Double
+                 time :: Int
                } deriving (Show,Eq)
 
 toRow :: [String] -> Row
-toRow x =  Row (read (x !! 0) :: Int) (x !! 1) (x !! 2) (x !! 3)( x !! 4)  (read ( x !! 5) :: Int) (read (x !! 6) :: Double)
+toRow x =  Row (read (x !! 0) :: Int) (x !! 1) (x !! 2) (x !! 3) ( x !! 4)  (read ( x !! 5) :: Int)
 
 updateTodos :: (MonadReader VConfig m, MonadIO m) => Int -> Int ->  m ()
 updateTodos sqlId timeTaken = execQuery "insert into todo (id,Description,Title,Entered,Due,state,time,Subject) select id,Description,Title,Entered,datetime('now', 'localtime'),0,?,Subject from todo where id = ? limit 1" [ timeTaken, sqlId]