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

Add additional case sensitive file filters for *nix

Browse source
This commit is contained in:
Samuel Gomes 2023-08-24 22:07:13 +05:30
parent 1fc5792d57
commit 1a43246c65
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
source/ide/ide_methods.bas
View file

@ -20301,7 +20301,7 @@ FUNCTION SaveFile$ (IdeOpenFile AS STRING)
IF RIGHT$(Default_StartDir$, 1) <> idepathsep$ THEN Default_StartDir$ = Default_StartDir$ + idepathsep$
END IF
f$ = _SAVEFILEDIALOG$("Save Source File", Default_StartDir$ + IdeOpenFile, "*.bas", "QB64-PE BAS File")
f$ = _SAVEFILEDIALOG$("Save Source File", Default_StartDir$ + IdeOpenFile, "*.bas|*.BAS|*.Bas", "QB64-PE BAS File")
IF f$ = "" THEN
SaveFile$ = "C"
EXIT FUNCTION 'someone canceled the input.