From baceb25527331ba926ec430e76e0e666a6b35998 Mon Sep 17 00:00:00 2001
From: "shrutiv%netscape.com" <shrutiv%netscape.com>
Date: Fri, 8 Jun 2001 23:22:03 +0000
Subject: [PATCH] Bug 84375: "CCK -" added before Company identifier (r=bobj)
 "CCK-" is added to user agent string only once

---
 cck/ib/ib.cpp | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/cck/ib/ib.cpp b/cck/ib/ib.cpp
index b246e93e17a..b2a5649915c 100644
--- a/cck/ib/ib.cpp
+++ b/cck/ib/ib.cpp
@@ -936,10 +936,13 @@ int StartIB(CString parms, WIDGET *curWidget)
 
 //Check to see if the User Agent string exists and if so then append -CCK to it ;
 	CString userAgent = GetGlobal("OrganizationName");
-	CString tempAgent ="CCK -";
-	if (userAgent)
-		tempAgent += userAgent;
-	SetGlobal("OrganizationName",tempAgent);
+    if (userAgent)
+    {
+        CString templeft = userAgent.Left(5);
+        if ((templeft.CompareNoCase("CCK -")) != 0)
+            userAgent = "CCK -" + userAgent;
+    }
+    SetGlobal("OrganizationName",userAgent);
 
 // check to see if the bmp for rshell background is bigger than 302KB;
 	HANDLE hFile;