From 9e39fbdff8e88dc4bad9b8e2dcf669206f63dd48 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 14 Jun 2008 11:29:25 +0000
Subject: [PATCH] IDE: fixed loading history position filenames

git-svn-id: trunk@15420 -
---
 ide/projectdefs.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ide/projectdefs.pas b/ide/projectdefs.pas
index 3f28984ced..d28208f370 100644
--- a/ide/projectdefs.pas
+++ b/ide/projectdefs.pas
@@ -635,8 +635,10 @@ begin
   NewHistoryIndex:=XMLConfig.GetValue(Path+'JumpHistory/HistoryIndex',-1);
   NewPosition:=nil;
   for i:=0 to NewCount-1 do begin
-    if NewPosition=nil then
+    if NewPosition=nil then begin
       NewPosition:=TProjectJumpHistoryPosition.Create('',Point(0,0),0);
+      NewPosition.OnLoadSaveFilename:=OnLoadSaveFilename;
+    end;
     NewPosition.LoadFromXMLConfig(XMLConfig,
                                  Path+'JumpHistory/Position'+IntToStr(i+1)+'/');
     if (NewPosition.Filename<>'') and (NewPosition.CaretXY.Y>0)