diff --git a/inc/lweb_helper.pbi b/inc/lweb_helper.pbi
index 40cc8c2..2bc8d29 100644
--- a/inc/lweb_helper.pbi
+++ b/inc/lweb_helper.pbi
@@ -4,7 +4,7 @@
 ;*
 
 Procedure.s mimetype(file.s)
-  Select file
+  Select LCase(file)
     Case "pdf"
       ProcedureReturn "application/pdf"
     Case "zip"
@@ -56,4 +56,10 @@ Procedure.s MapToJSONString(Map ConvertMap.s())
     ProcedureReturn Response
   EndIf
   ProcedureReturn #error_string
+EndProcedure
+
+Procedure.s xml_error_debug(XMLHandle)
+  Define Debug_String.s
+  Debug_String = "XML Error:["+XMLError(XMLHandle)+"] At Line:["+Str(XMLErrorLine(XMLHandle))+"] Position:["+Str(XMLErrorPosition(XMLHandle))+"]"
+  ProcedureReturn Debug_String 
 EndProcedure
\ No newline at end of file