From 6353cb60a0236a2ff27e01939d92e8680252f773 Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Sat, 17 Aug 2002 23:40:00 +0000
Subject: [PATCH] Cleanups

git-svn-id: trunk@1908 -
---
 lcl/interfaces/gtk/gtkwinapi.inc | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lcl/interfaces/gtk/gtkwinapi.inc b/lcl/interfaces/gtk/gtkwinapi.inc
index c5c9f36182..5eba3512fe 100644
--- a/lcl/interfaces/gtk/gtkwinapi.inc
+++ b/lcl/interfaces/gtk/gtkwinapi.inc
@@ -6374,7 +6374,7 @@ begin
      PTimerInfo^.Handle    := hWND;
      PTimerInfo^.IDEvent   := nIDEvent;
      PTimerInfo^.TimerFunc := lpTimerFunc;
-     gtk_timeout_add(uElapse, @gtkTimerCB, PTimerInfo);
+     Result:= gtk_timeout_add(uElapse, @gtkTimerCB, PTimerInfo);
      FTimerData.Add (PTimerInfo);
   end;
 end;
@@ -7243,6 +7243,9 @@ end;
 { =============================================================================
 
   $Log$
+  Revision 1.152  2002/10/09 20:08:41  lazarus
+  Cleanups
+
   Revision 1.151  2002/10/09 10:22:55  lazarus
   MG: fixed client origin coordinates