From 73e6de8fde12df2b6de12bb6c6b3dcc906120ff9 Mon Sep 17 00:00:00 2001
From: skalogryz <skalogryz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 6 Mar 2009 08:18:26 +0000
Subject: [PATCH] added Handle:=nil to .release method

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@728 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 bindings/pascocoa/foundation/NSObject.inc | 1 +
 1 file changed, 1 insertion(+)

diff --git a/bindings/pascocoa/foundation/NSObject.inc b/bindings/pascocoa/foundation/NSObject.inc
index 51aaba1ef..e6c9166e9 100644
--- a/bindings/pascocoa/foundation/NSObject.inc
+++ b/bindings/pascocoa/foundation/NSObject.inc
@@ -302,6 +302,7 @@ end;
 procedure NSObject.release;
 begin
   objc_msgSend(Handle, sel_registerName(PChar(Str_release)), []);
+  Handle:=nil;
 end;
 
 function NSObject.autorelease: objc.id;