QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 09:04:43 +00:00
Code Issues Releases Wiki Activity

Tries harder to find include files for double-clicking

Browse source
This commit is contained in:
Fellippe Heitor 2021-02-09 16:46:34 -03:00
parent 0d92432fbf
commit 35eac42235
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
source/ide/ide_methods.bas
View file

@ -2768,6 +2768,7 @@ FUNCTION ide2 (ignore)
'a separate instance of QB64:
p$ = idepath$ + pathsep$
f$ = p$ + ActiveINCLUDELinkFile
IF _FILEEXISTS(f$) = 0 THEN f$ = ActiveINCLUDELinkFile
IF _FILEEXISTS(f$) THEN
backupIncludeFile = FREEFILE
OPEN f$ FOR BINARY AS #backupIncludeFile
@ -8258,7 +8259,9 @@ SUB ideshowtext
ActiveINCLUDELinkFile = MID$(a$, FindApostrophe1 + 1, FindApostrophe2 - FindApostrophe1 - 1)
p$ = idepath$ + pathsep$
f$ = p$ + ActiveINCLUDELinkFile
IF _FILEEXISTS(f$) THEN a$ = a$ + " --> Double-click to open": ActiveINCLUDELink = idecy
IF _FILEEXISTS(f$) OR _FILEEXISTS(ActiveINCLUDELinkFile) THEN
a$ = a$ + " --> Double-click to open": ActiveINCLUDELink = idecy
END IF
END IF
'ELSE
' temp_a$ = idegetline(idecy)