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

Browse source
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"
@ -57,3 +57,9 @@ Procedure.s MapToJSONString(Map ConvertMap.s())
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