From 27c79d422f3f22c793d5a3c66ba5bd5bbed1f80f Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Sat, 20 Jun 2015 11:31:52 +0000
Subject: strange perversion removed

git-svn-id: http://svn.miranda-ng.org/main/trunk@14285 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Watrack/srv_getinfo.pas | 32 +-------------------------------
 1 file changed, 1 insertion(+), 31 deletions(-)

(limited to 'plugins/Watrack/srv_getinfo.pas')

diff --git a/plugins/Watrack/srv_getinfo.pas b/plugins/Watrack/srv_getinfo.pas
index 66c26845a4..fc39645439 100644
--- a/plugins/Watrack/srv_getinfo.pas
+++ b/plugins/Watrack/srv_getinfo.pas
@@ -2,7 +2,7 @@ unit srv_getinfo;
 
 interface
 
-uses wat_api;
+uses m_api, wat_api;
 
 function GetPlayerInfo(var dst:tSongInfo;flags:cardinal):integer;
 {
@@ -43,31 +43,6 @@ uses
   common, msninfo, syswin, wrapper, io, winampapi,
   srv_player, srv_format;
 
-//----- Miranda cheat -----
-const
-  CoreDLL = 'mir_core.dll';
-type
-  tmir_free=procedure(para1:pointer); cdecl;
-var
-  mir_free:tmir_free;
-  MMCore:THANDLE;
-
-procedure InitMirandaMM;
-begin
-  MMCore:=LoadLibraryW(CoreDLL);
-  if MMCore<>0 then
-    @mir_free:=GetProcAddress(MMCore,PAnsiChar('mir_free'));
-end;
-
-procedure FreeMirandaMM;
-begin
-  if MMCore<>0 then
-  begin
-    FreeLibrary(MMCore);
-    MMCore:=0;
-  end;
-end;
-
 //----- get player info -----
 
 function DefGetVersionText(ver:integer):pWideChar;
@@ -453,9 +428,4 @@ begin
   mFreeMem(oldtitle);
 end;
 
-initialization
-  InitMirandaMM;
-
-finalization
-  FreeMirandaMM;
 end.
-- 
cgit v1.2.3