mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 12:40:36 +00:00
Restores INPUT method for help files.
macOS didn't like them; Linux likely won't have liked either.
This commit is contained in:
parent
ef4c0876b5
commit
4adf513f74
|
@ -2401,7 +2401,7 @@ FUNCTION ide2 (ignore)
|
||||||
a2$ = UCASE$(a2$)
|
a2$ = UCASE$(a2$)
|
||||||
'check if F1 is in help links
|
'check if F1 is in help links
|
||||||
fh = FREEFILE
|
fh = FREEFILE
|
||||||
OPEN "internal\help\links.bin" FOR BINARY AS #fh
|
OPEN "internal\help\links.bin" FOR INPUT AS #fh
|
||||||
lnks = 0: lnks$ = CHR$(0)
|
lnks = 0: lnks$ = CHR$(0)
|
||||||
DO UNTIL EOF(fh)
|
DO UNTIL EOF(fh)
|
||||||
LINE INPUT #fh, l$
|
LINE INPUT #fh, l$
|
||||||
|
@ -4954,7 +4954,7 @@ FUNCTION ide2 (ignore)
|
||||||
|
|
||||||
'Add all linked pages to download list (if not already in list)
|
'Add all linked pages to download list (if not already in list)
|
||||||
fh = FREEFILE
|
fh = FREEFILE
|
||||||
OPEN "internal\help\links.bin" FOR BINARY AS #fh
|
OPEN "internal\help\links.bin" FOR INPUT AS #fh
|
||||||
DO UNTIL EOF(fh)
|
DO UNTIL EOF(fh)
|
||||||
LINE INPUT #fh, l$
|
LINE INPUT #fh, l$
|
||||||
IF LEN(l$) THEN
|
IF LEN(l$) THEN
|
||||||
|
@ -13807,7 +13807,7 @@ SUB IdeMakeContextualMenu
|
||||||
IF LEN(a2$) > 0 THEN
|
IF LEN(a2$) > 0 THEN
|
||||||
'check if F1 is in help links
|
'check if F1 is in help links
|
||||||
fh = FREEFILE
|
fh = FREEFILE
|
||||||
OPEN "internal\help\links.bin" FOR BINARY AS #fh
|
OPEN "internal\help\links.bin" FOR INPUT AS #fh
|
||||||
lnks = 0: lnks$ = CHR$(0)
|
lnks = 0: lnks$ = CHR$(0)
|
||||||
DO UNTIL EOF(fh)
|
DO UNTIL EOF(fh)
|
||||||
LINE INPUT #fh, l$
|
LINE INPUT #fh, l$
|
||||||
|
|
Loading…
Reference in a new issue