"File | Change Dir" implementiert

jakobsche · Dec 8, 2019 · b330d2a · b330d2a
1 parent ba9e230
commit b330d2a
Show file tree

Hide file tree

Showing 6 changed files with 4 additions and 0 deletions.
diff --git a/BASE.PAS b/BASE.PAS
@@ -401,6 +401,10 @@ begin
           end;
           ClearEvent(Event);
         end;
+      cmChangeDir: begin
+          ExecuteDialog(New(PChDirDialog, Init(cdNormal, 0)), nil);
+          ClearEvent(Event)
+        end;
       cmSelectWindow: begin
           if EditWindowList <> nil then begin
             WindowListViewData.List := EditWindowList;

diff --git a/BP.DSK b/BP.DSK
diff --git a/BP.PSM b/BP.PSM
diff --git a/CARLATXT.EXE b/CARLATXT.EXE
diff --git a/INSTALL/DPMI/DPMI16BI.OVL b/INSTALL/DPMI/DPMI16BI.OVL
diff --git a/INSTALL/DPMI/RTM.EXE b/INSTALL/DPMI/RTM.EXE