Tweak parsing errors more

src/Database/Schema/Migrations/Filesystem.hs

@@ -168,7 +168,7 @@ missingFields fs =
 migrationFromFields :: Migration -> [(Text, Text)] -> Either Text Migration
 migrationFromFields m [] = pure m
 migrationFromFields m ((name, value):rest) = do
-  processor <- maybe (Left $ "unrecognized name: " <> name) pure $ lookup name fieldProcessors
+  processor <- maybe (Left $ "unrecognized field: " <> name) pure $ lookup name fieldProcessors
   newM <- first (\e -> "failed processing " <> name <> ": " <> e) $ processor value m
   migrationFromFields newM rest
 
@@ -190,7 +190,7 @@ setTimestamp value m = do
   ts <- case readTimestamp value of
           ((t, ""):_) -> Right t
           [(t, _)] -> Right t
-          _ -> Left "value did not parse as UTCTime"
+          _ -> Left $ "value did not parse as UTCTime: " <> value
   return $ m { mTimestamp = Just ts }
 
 readTimestamp :: Text -> [(UTCTime, String)]