From adab0642b93ffdbf85d13deb5b99ee23bb0786d3 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Tue, 12 May 2009 12:42:21 +0000
Subject: [PATCH] IDE: todo list: small improvement

git-svn-id: trunk@19941 -
---
 ide/todolist.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ide/todolist.pas b/ide/todolist.pas
index 5ff198a761..eff23d173b 100644
--- a/ide/todolist.pas
+++ b/ide/todolist.pas
@@ -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;