diff --git a/comp/src/gb.util.web/.component b/comp/src/gb.util.web/.component index 57641e71c..5d1313bcc 100644 --- a/comp/src/gb.util.web/.component +++ b/comp/src/gb.util.web/.component @@ -1,4 +1,4 @@ [Component] Key=gb.util.web -Version=3.15.90 +Version=3.16.0 State=1 diff --git a/comp/src/gb.util.web/.icon.png b/comp/src/gb.util.web/.icon.png index a9254f949..eedc7d886 100644 Binary files a/comp/src/gb.util.web/.icon.png and b/comp/src/gb.util.web/.icon.png differ diff --git a/comp/src/gb.util.web/.project b/comp/src/gb.util.web/.project index 4ee8c18d6..841970315 100644 --- a/comp/src/gb.util.web/.project +++ b/comp/src/gb.util.web/.project @@ -1,7 +1,7 @@ # Gambas Project File 3.0 Title=gb.util.web Startup=MMain -Version=3.15.90 +Version=3.16.0 VersionFile=1 TabSize=2 Language=fr diff --git a/comp/src/gb.util.web/.src/URL.class b/comp/src/gb.util.web/.src/URL.class index c9f332089..3879e38b8 100644 --- a/comp/src/gb.util.web/.src/URL.class +++ b/comp/src/gb.util.web/.src/URL.class @@ -30,7 +30,7 @@ Static Public Sub Quote((Path) As String) As String End -Static Public Sub UnQuote((Path) As String, Optional IgnorePlus As Boolean) As String +Static Public Sub Unquote((Path) As String, Optional DoNotDecodePlus As Boolean) As String Dim iInd As Integer Dim sRes As String @@ -41,7 +41,7 @@ Static Public Sub UnQuote((Path) As String, Optional IgnorePlus As Boolean) As S If sCar = "%" Then sCar = Chr$(Val("&H" & Mid$(Path, iInd + 1, 2))) iInd += 2 - Else If sCar = "+" And If Not IgnorePlus Then + Else If sCar = "+" And If Not DoNotDecodePlus Then sCar = " " Endif sRes &= sCar