PB_Includes
/
lweb
1
0
Fork 0
Code Issues 3 Pull Requests Projects 1 Releases 2 Wiki Activity

added XML Debug String function and fix file selector

This commit is contained in:
René Linder 2023-03-29 10:43:54 +02:00
parent 6a57a9f393
commit d22652cd92
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
inc/lweb_helper.pbi
View File

@ -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