From e6edf895f4d098264c1dfb20f3b47c19f16db22b Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Sun, 18 Apr 2010 08:40:27 +0000
Subject: [PATCH] gtk2: cleanup

git-svn-id: trunk@24690 -
---
 lcl/interfaces/gtk2/gtk2listviewtreemodel.pas | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lcl/interfaces/gtk2/gtk2listviewtreemodel.pas b/lcl/interfaces/gtk2/gtk2listviewtreemodel.pas
index f57d6de2c0..7199cb2c89 100644
--- a/lcl/interfaces/gtk2/gtk2listviewtreemodel.pas
+++ b/lcl/interfaces/gtk2/gtk2listviewtreemodel.pas
@@ -293,7 +293,6 @@ begin
   Result := False;
   if ListView = nil then
     Exit;
-  WriteLn(PtrUInt(Iter^.user_data));
   Inc(PtrUInt(Iter^.user_data));
   Result := PtrUint(Iter^.user_data) < ListView.items.Count;
 end;
@@ -321,7 +320,7 @@ begin
   Result := False;
   if (ListView = nil) or (parent <> nil) then
     Exit;
-  if (Iter = nil) and (n < ListView.Items.Count) then
+  if (Iter <> nil) and (n < ListView.Items.Count) then
   begin
     PtrUint(Iter^.user_data) := n;
     Result := True;