Separate region and subregion in report JSON
commit427586a58f6553eea74993fa10c9b04c3c427288
authorEvan Czaplicki <info@elm-lang.org>
dateSun 31 May 2015, 09:08 (11 years ago)
parentc62bea9
src/Reporting/Error.hs+2−1
@@ -73,7 +73,8 @@ toJson dealiaser filePath (A.A region err) =
7373 in
7474 Json.object $
7575 [ "file" .= filePath
76− , "region" .= maybe region id maybeRegion
76+ , "region" .= region
77+ , "subregion" .= maybeRegion
7778 , "type" .= ("error" :: String)
7879 ]
7980 ++ additionalFields