Explorar o código

Fix copy-paste error

Margers hai 10 meses
pai
achega
7ac4e38b71
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      packages/ide/fpdesk.pas

+ 1 - 1
packages/ide/fpdesk.pas

@@ -1038,7 +1038,7 @@ begin
     if ((DesktopFileFlags and dfCodeTemplates)<>0) then
       OK:=ReadCodeTemplates(F) and OK;
     if ((DesktopFileFlags and dfReturnToLastDir)<>0) then
-        OK:=WriteReturnToLastDir(F) and OK;
+      OK:=ReadReturnToLastDir(F) and OK;
 {$ifdef Unix}
     OK:=ReadKeys(F) and OK;
 {$endif Unix}