Fix type annotation (take 2)

nsaunders · web-flow · commit 55e658aecc6d · 2019-09-21T11:42:18.000-07:00
diff --git a/README.md b/README.md
@@ -18,7 +18,7 @@ type Config =
   , count    :: Int
   }
 
-readConfig :: Foreign Object -> Either String Config
+readConfig :: Object String -> Either String Config
 readConfig env = { greeting: _, count: _ }
   <$> value "GREETING"
   <*> (value "COUNT" >>= Int.fromString >>> note "Invalid COUNT")

Original file line number	Diff line number	Diff line change
`@@ -18,7 +18,7 @@ type Config =`
`18`	`18`	`, count :: Int`
`19`	`19`	`}`
`20`	`20`
`21`		`-readConfig :: Foreign Object -> Either String Config`
	`21`	`+readConfig :: Object String -> Either String Config`
`22`	`22`	`readConfig env = { greeting: _, count: _ }`
`23`	`23`	`<$> value "GREETING"`
`24`	`24`	`<*> (value "COUNT" >>= Int.fromString >>> note "Invalid COUNT")`