mirror of
https://github.com/QB64Official/qb64.git
synced 2024-09-28 11:17:47 +00:00
More wiki updates.
- fixed the by usage page not loading in some cases. - remove SUB Help_PreView; appears to be unused. - fixed downloaded file being incorrectly saved with txt extension.
This commit is contained in:
parent
0ad2acd7dd
commit
dc2451cea6
2 changed files with 28 additions and 28 deletions
|
@ -5315,7 +5315,7 @@ FUNCTION ide2 (ignore)
|
||||||
END IF
|
END IF
|
||||||
IF menu$(m, s) = "#Keywords By Usage" THEN
|
IF menu$(m, s) = "#Keywords By Usage" THEN
|
||||||
PCOPY 3, 0: SCREEN , , 3, 0
|
PCOPY 3, 0: SCREEN , , 3, 0
|
||||||
lnk$ = "Keyword Reference - By usage"
|
lnk$ = "Keyword Reference - By Usage"
|
||||||
GOTO OpenHelpLnk
|
GOTO OpenHelpLnk
|
||||||
END IF
|
END IF
|
||||||
|
|
||||||
|
|
|
@ -87,7 +87,7 @@ FUNCTION Wiki$ (PageName$)
|
||||||
|
|
||||||
|
|
||||||
url$ = CHR$(34) + wikiBaseAddress$ + "/" + PageName2$ + ".md" + CHR$(34)
|
url$ = CHR$(34) + wikiBaseAddress$ + "/" + PageName2$ + ".md" + CHR$(34)
|
||||||
outputFile$ = Cache_Folder$ + "/" + PageName2$ + ".txt"
|
outputFile$ = Cache_Folder$ + "/" + PageName2$ + ".md"
|
||||||
|
|
||||||
SHELL _HIDE "curl -L -o " + CHR$(34) + outputFile$ + CHR$(34) + " " + url$
|
SHELL _HIDE "curl -L -o " + CHR$(34) + outputFile$ + CHR$(34) + " " + url$
|
||||||
fh = FREEFILE
|
fh = FREEFILE
|
||||||
|
@ -183,34 +183,34 @@ SUB Help_NewLine
|
||||||
|
|
||||||
END SUB
|
END SUB
|
||||||
|
|
||||||
SUB Help_PreView
|
' SUB Help_PreView ' Does not appear to be in use.
|
||||||
|
|
||||||
OPEN "help_preview.txt" FOR OUTPUT AS #1
|
' OPEN "help_preview.txt" FOR OUTPUT AS #1
|
||||||
FOR i = 1 TO LEN(Help_Txt$) STEP 4
|
' FOR i = 1 TO LEN(Help_Txt$) STEP 4
|
||||||
c = ASC(Help_Txt$, i)
|
' c = ASC(Help_Txt$, i)
|
||||||
c$ = CHR$(c)
|
' c$ = CHR$(c)
|
||||||
IF c = 13 THEN c$ = CHR$(13) + CHR$(10)
|
' IF c = 13 THEN c$ = CHR$(13) + CHR$(10)
|
||||||
PRINT #1, c$;
|
' PRINT #1, c$;
|
||||||
NEXT
|
' NEXT
|
||||||
CLOSE #1
|
' CLOSE #1
|
||||||
|
|
||||||
CLS
|
' CLS
|
||||||
FOR i = 1 TO LEN(Help_Txt$) STEP 4
|
' FOR i = 1 TO LEN(Help_Txt$) STEP 4
|
||||||
c = ASC(Help_Txt$, i)
|
' c = ASC(Help_Txt$, i)
|
||||||
col = ASC(Help_Txt$, i + 1)
|
' col = ASC(Help_Txt$, i + 1)
|
||||||
IF c = 13 THEN
|
' IF c = 13 THEN
|
||||||
COLOR col AND 15, col \ 16
|
' COLOR col AND 15, col \ 16
|
||||||
PRINT SPACE$(help_w - POS(0));
|
' PRINT SPACE$(help_w - POS(0));
|
||||||
COLOR 7, 0
|
' COLOR 7, 0
|
||||||
PRINT SPACE$(_WIDTH - POS(0) + 1);
|
' PRINT SPACE$(_WIDTH - POS(0) + 1);
|
||||||
COLOR col AND 15, col \ 16
|
' COLOR col AND 15, col \ 16
|
||||||
SLEEP
|
' SLEEP
|
||||||
ELSE
|
' ELSE
|
||||||
COLOR col AND 15, col \ 16
|
' COLOR col AND 15, col \ 16
|
||||||
PRINT CHR$(c);
|
' PRINT CHR$(c);
|
||||||
END IF
|
' END IF
|
||||||
NEXT
|
' NEXT
|
||||||
END SUB
|
' END SUB
|
||||||
|
|
||||||
|
|
||||||
FUNCTION Help_Col 'helps to calculate the default color
|
FUNCTION Help_Col 'helps to calculate the default color
|
||||||
|
|
Loading…
Reference in a new issue