X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FMain.hs;h=fc6d14b8a116aef185d0c7d362b2204c912ff135;hb=3768238ca528db394e4777ac1e19b2091979e1c8;hp=90f5f91d9682b5366bbed33d2b00b334b567f0dd;hpb=b2c39ebe5ff9c1ea3224231df5078c52d0ad8737;p=dead%2Fhtsn-import.git

diff --git a/src/Main.hs b/src/Main.hs
index 90f5f91..fc6d14b 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -96,7 +96,7 @@ import_file cfg path = do
       report_error $ "Unable to determine DTD for file " ++ path ++ "."
       return False
     (ImportFailed errmsg:_) -> do
-      report_error errmsg
+      report_error $ errmsg ++ " (" ++ path ++ ")"
       return False
     (ImportSkipped infomsg:_) -> do
       -- We processed the message but didn't import anything. Return