QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-01 13:50:36 +00:00
Code Issues Releases Wiki Activity

Add plus (+) to the list of critical chars

Browse source
This commit is contained in:
Roland Heyder 2022-06-15 11:19:26 +02:00
parent aba2021b76
commit 5f039415bf
2 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
source/ide/ide_methods.bas
View file

@ -2273,6 +2273,7 @@ FUNCTION ide2 (ignore)
launchWiki:
url$ = wikiBaseAddress$ + "/index.php?title=" + Back$(Help_Back_Pos)
url$ = StrReplace$(url$, " ", "%20"): url$ = StrReplace$(url$, "&", "%26")
url$ = StrReplace$(url$, "+", "%2B")
IF INSTR(_OS$, "WIN") = 0 THEN
url$ = StrReplace$(url$, "$", "\$")
url$ = StrReplace$(url$, "&", "\&")
@ -18867,9 +18868,9 @@ FUNCTION ideupdatehelpbox
FOR i = 1 TO LEN(l$)
c = ASC(l$, i)
SELECT CASE c
CASE 32 ' '(space)
CASE 32 ' '(space)
PageName2$ = PageName2$ + "_"
CASE 34, 38, 42, 47, 58, 60, 62, 63, 92, 124 '("&*/:<>?\|)
CASE 34, 38, 42, 43, 47, 58, 60, 62, 63, 92, 124 '("&*+/:<>?\|)
PageName2$ = PageName2$ + "%" + HEX$(c)
CASE ELSE
PageName2$ = PageName2$ + CHR$(c)

4
source/ide/wiki/wiki_methods.bas
View file

@ -14,9 +14,9 @@ FUNCTION Wiki$ (PageName$) 'Read cached wiki page (download, if not yet cached)
FOR i = 1 TO LEN(PageName$)
c = ASC(PageName$, i)
SELECT CASE c
CASE 32 ' '(space)
CASE 32 ' '(space)
PageName2$ = PageName2$ + "_"
CASE 34, 38, 42, 47, 58, 60, 62, 63, 92, 124 '("&*/:<>?\|)
CASE 34, 38, 42, 43, 47, 58, 60, 62, 63, 92, 124 '("&*+/:<>?\|)
PageName2$ = PageName2$ + "%" + HEX$(c)
CASE ELSE
PageName2$ = PageName2$ + CHR$(c)