From de5dce707cc60ace5b92d2ac61914c590cb9680b Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Sat, 29 Jun 2013 18:16:23 +0000
Subject: rest of unused databases services removed

git-svn-id: http://svn.miranda-ng.org/main/trunk@5181 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/MirandaNGHistoryToDB/Contacts.pas | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

(limited to 'plugins/MirandaNGHistoryToDB/Contacts.pas')

diff --git a/plugins/MirandaNGHistoryToDB/Contacts.pas b/plugins/MirandaNGHistoryToDB/Contacts.pas
index 8d95b5f3bc..6ecb7f7eec 100644
--- a/plugins/MirandaNGHistoryToDB/Contacts.pas
+++ b/plugins/MirandaNGHistoryToDB/Contacts.pas
@@ -110,7 +110,6 @@ function GetContactID(hContact: THandle; Proto: AnsiString = ''; Contact: Boolea
 var
   uid: PAnsiChar;
   dbv: TDBVARIANT;
-  cgs: TDBCONTACTGETSETTING;
   tmp: String;
 begin
   Result := '';
@@ -121,11 +120,8 @@ begin
     uid := PAnsiChar(CallProtoService(PAnsiChar(Proto), PS_GETCAPS, PFLAG_UNIQUEIDSETTING, 0));
     if (Cardinal(uid) <> CALLSERVICE_NOTFOUND) and (uid <> nil) then
     begin
-      cgs.szModule := PAnsiChar(Proto);
-      cgs.szSetting := uid;
-      cgs.pValue := @dbv;
       try
-        if CallService(MS_DB_CONTACT_GETSETTING, hContact, LPARAM(@cgs)) = 0 then
+        if db_get(hContact, PAnsiChar(Proto), uid, @dbv) = 0 then
         begin
           case dbv._type of
             DBVT_BYTE:
-- 
cgit v1.2.3