From 02181f508e423d13b86549af29a82069c6f5beab Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 9 Jul 2008 15:00:23 +0000
Subject: [PATCH] gtk1: fixed regression: gtk list IndexOf locked the change
 vents

git-svn-id: trunk@15725 -
---
 lcl/interfaces/gtk/gtklistsl.inc | 2 --
 lcl/interfaces/gtk/gtkproc.pp    | 4 ++--
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/lcl/interfaces/gtk/gtklistsl.inc b/lcl/interfaces/gtk/gtklistsl.inc
index f2da46b56d..db6d2db667 100644
--- a/lcl/interfaces/gtk/gtklistsl.inc
+++ b/lcl/interfaces/gtk/gtklistsl.inc
@@ -869,7 +869,6 @@ function TGtkListStringList.IndexOf(const S: string): Integer;
 var
   l, m, r, cmp: integer;
 begin
-  BeginUpdate;
   if FSorted then begin
     l:=0;
     r:=Count-1;
@@ -891,7 +890,6 @@ begin
   end else begin
     Result:=inherited IndexOf(S);
   end;
-  EndUpdate;
 end;
 
 {------------------------------------------------------------------------------
diff --git a/lcl/interfaces/gtk/gtkproc.pp b/lcl/interfaces/gtk/gtkproc.pp
index 48f5d7dd48..9c907ccb21 100644
--- a/lcl/interfaces/gtk/gtkproc.pp
+++ b/lcl/interfaces/gtk/gtkproc.pp
@@ -665,8 +665,8 @@ procedure UpdateStatusBarPanel(StatusBar: TObject; Index: integer;
                                StatusPanelWidget: PGtkWidget);
 
 // list
-function gtkListSelectChild(widget: PGtkWidget;child : PGtkWidget;
-                                      data: gPointer): GBoolean; cdecl;
+function gtkListSelectChild(widget: PGtkWidget; child: PGtkWidget;
+                            data: gPointer): GBoolean; cdecl;
 function gtkListGetSelectionMode(list: PGtkList): TGtkSelectionMode;cdecl;