mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 10:59:29 +02:00
IDE: todo list: small improvement
git-svn-id: trunk@19941 -
This commit is contained in:
parent
a8ecb3e7aa
commit
adab0642b9
@ -616,7 +616,7 @@ begin
|
||||
|
||||
//DebugLn(['TfrmTodo.acRefreshExecute MainSourceFilename=',MainSourceFilename]);
|
||||
|
||||
if not LazarusIDE.BeginCodeTools then exit;
|
||||
if not LazarusIDE.SaveSourceEditorChangesToCodeCache(-1) then exit;
|
||||
|
||||
Screen.Cursor:=crHourGlass;
|
||||
Owners:=nil;
|
||||
|
Loading…
Reference in New Issue
Block a user