From 3aa21308ba55d23ea8f6c3f1c9f1ffc4ea62437f Mon Sep 17 00:00:00 2001
From: geby <geby@7c85be65-684b-0410-a082-b2ed4fbef004>
Date: Wed, 30 Apr 2014 13:15:48 +0000
Subject: [PATCH] TLDAPAttribute.Add fix of fix. ;-)

git-svn-id: https://svn.code.sf.net/p/synalist/code/trunk@192 7c85be65-684b-0410-a082-b2ed4fbef004
---
 ldapsend.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ldapsend.pas b/ldapsend.pas
index 51dc8ea..0bcac39 100644
--- a/ldapsend.pas
+++ b/ldapsend.pas
@@ -355,7 +355,8 @@ implementation
 {==============================================================================}
 function TLDAPAttribute.Add(const S: string): Integer;
 begin
-  Put(inherited Add(''), S);
+  Result := inherited Add('');
+  Put(Result,S);
 end;
 
 function TLDAPAttribute.Get(Index: integer): string;