diff options
| author | George Hazan <george.hazan@gmail.com> | 2013-06-29 18:16:23 +0000 |
|---|---|---|
| committer | George Hazan <george.hazan@gmail.com> | 2013-06-29 18:16:23 +0000 |
| commit | de5dce707cc60ace5b92d2ac61914c590cb9680b (patch) | |
| tree | 64f2ee6639edeefcc9a32425d10cd56463dab6a4 /plugins/MirandaNGHistoryToDB/Menu.pas | |
| parent | 13952bddf4931ed75338460754860a81d3710678 (diff) | |
rest of unused databases services removed
git-svn-id: http://svn.miranda-ng.org/main/trunk@5181 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/MirandaNGHistoryToDB/Menu.pas')
| -rw-r--r-- | plugins/MirandaNGHistoryToDB/Menu.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/plugins/MirandaNGHistoryToDB/Menu.pas b/plugins/MirandaNGHistoryToDB/Menu.pas index 15d51a11b7..b2218747b5 100644 --- a/plugins/MirandaNGHistoryToDB/Menu.pas +++ b/plugins/MirandaNGHistoryToDB/Menu.pas @@ -170,7 +170,7 @@ var AccountName: ^PPROTOACCOUNT;
begin
// Получаем список контактов
- hContact := CallService(MS_DB_CONTACT_FINDFIRST, 0, 0);
+ hContact := db_find_first();
while hContact <> 0 do
begin
ContactProto := GetContactProto(hContact);
@@ -183,7 +183,7 @@ begin ContactID := TranslateW('Unknown Contact');
if not ((MatchStrings(LowerCase(ContactProto), 'skype*')) or (ContactID = TranslateW('Unknown Contact')) or MatchStrings(LowerCase(ContactProto), 'metacontacts*')) then
WriteInLog(ProfilePath, Format('%s;%s;%s;%d', [ContactID, ContactName, GroupName, StrContactProtoToInt(ContactProto)]), 3);
- hContact := CallService(MS_DB_CONTACT_FINDNEXT, hContact, 0);
+ hContact := db_find_next(hContact);
end;
AccountCount := 0;
// Выгружаем список протоколов в файл ProtoList.csv
|