From 36d78e20384818ee92413d2f4bc6565964036ce6 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Mon, 23 Dec 2013 17:51:47 -0500 Subject: [PATCH] Fix typo. --- src/TSN/Xml.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/TSN/Xml.hs b/src/TSN/Xml.hs index 9d83f58..ebc4fb7 100644 --- a/src/TSN/Xml.hs +++ b/src/TSN/Xml.hs @@ -56,7 +56,7 @@ parse_xmlfid doc = read_either_integer :: String -> Either String Integer read_either_integer s = - let msg = "Could not parse XML_File_ID" ++ s ++ " as an integer." + let msg = "Could not parse XML_File_ID " ++ s ++ " as an integer." in maybeToEither msg (readMaybe s) -- 2.43.2