From 5546ec3c29170b5177db5d69cdfa75075c1667f0 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Thu, 28 Feb 2008 14:18:43 +0000
Subject: [PATCH] IDE: fixed compilation under 64bit

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

diff --git a/ide/issuebrowser.pas b/ide/issuebrowser.pas
index 6599079265..a22a91ff00 100644
--- a/ide/issuebrowser.pas
+++ b/ide/issuebrowser.pas
@@ -234,7 +234,7 @@ begin
       begin
         with IssueTreeView.Items.AddChild(nil, Issues[I]) do
         begin
-          ID := Integer(Issues.Objects[I]);
+          ID := PtrInt(Issues.Objects[I]);
           
           ImageIndex := IDEImages.LoadImage(16, WidgetSetImageNames[FIssueList[ID].WidgetSet]);
           StateIndex := ImageIndex;