From a1ca1f474646e7f4fb96cb9972c7d113c0f23f21 Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Sat, 31 Jul 2021 02:28:56 -0300
Subject: [PATCH] Fixes path changing routine in file dialog.

---
 source/ide/ide_methods.bas | 17 ++++++++++++++---
 1 file changed, 14 insertions(+), 3 deletions(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index fb3a6766f..5daa32766 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -9779,9 +9779,20 @@ FUNCTION idefiledialog$(programname$, mode AS _BYTE)
         IF focus = 3 THEN
             IF (K$ = CHR$(13) OR info = 1) AND o(3).sel >= 1 THEN
                 newpath$ = idetxt(o(3).stx)
-                IF newpath$ = "" THEN newpath$ = ".."
-                f$ = newpath$
-                GOTO changepath
+                IF newpath$ = "" THEN
+                    newpath$ = ".."
+                    f$ = newpath$
+                    GOTO changepath
+                ELSE
+                    path$ = idezchangepath(path$, newpath$)
+                    idetxt(o(2).txt) = idezfilelist$(path$, AllFiles, "")
+                    idetxt(o(3).txt) = idezpathlist$(path$)
+
+                    o(2).sel = -1
+                    o(3).sel = 1
+                    IF info = 1 THEN o(3).sel = -1
+                    GOTO ideopenloop
+                END IF
             END IF
         END IF