From 8ef40f0bd018c6f9295977c206714db8d1e6159c Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Fri, 1 Mar 2013 23:11:39 +0000
Subject: code cleanup for pascal plugins

git-svn-id: http://svn.miranda-ng.org/main/trunk@3828 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Watrack/kolframe/frm_dlg1.inc | 2 +-
 plugins/Watrack/stat/statlog.pas      | 7 +------
 plugins/Watrack/waticons.pas          | 6 +-----
 3 files changed, 3 insertions(+), 12 deletions(-)

(limited to 'plugins/Watrack')

diff --git a/plugins/Watrack/kolframe/frm_dlg1.inc b/plugins/Watrack/kolframe/frm_dlg1.inc
index 19f590af66..08028a3356 100644
--- a/plugins/Watrack/kolframe/frm_dlg1.inc
+++ b/plugins/Watrack/kolframe/frm_dlg1.inc
@@ -200,7 +200,7 @@ begin
         mGetMem(buf1,1024{*SizeOf(WideChar)});
         buf1^:=#0;
         buf:=GetDlgText(Dialog,IDC_FRMBKPIC,true);
-        CallService(MS_UTILS_PATHTORELATIVE,dword(buf),dword(buf1));
+        CallService(MS_UTILS_PATHTORELATIVE,wparam(buf),lparam(buf1));
         if StrCmp(buf1,D.BkDefFile)<>0 then
         begin
           mFreeMem(D.BkDefFile);
diff --git a/plugins/Watrack/stat/statlog.pas b/plugins/Watrack/stat/statlog.pas
index 50af34508d..fa49bc5fb0 100644
--- a/plugins/Watrack/stat/statlog.pas
+++ b/plugins/Watrack/stat/statlog.pas
@@ -358,7 +358,7 @@ begin
         begin
           CurCell^.next:=Cell;
           CurCell:=Cell;
-        end;  
+        end;
       end;
     end;
     inc(p,2); p1:=p;
@@ -414,7 +414,6 @@ var
 begin
   Lock:=true;
   ConvertFileName(fname,buf1);
-//  CallService(MS_UTILS_PATHTOABSOLUTE,dword(fname),dword(@buf1));
   Root:=BuildTree(buf1,buf);
   if Root<>nil then
   begin
@@ -459,7 +458,6 @@ begin
   else
     fname:=PAnsiChar(wParam);
   ConvertFileName(fname,log);
-//  CallService(MS_UTILS_PATHTOABSOLUTE,dword(fname),dword(@log));
   AppendStat(log,pSongInfo(lParam));
 end;
 
@@ -491,9 +489,6 @@ begin
     ConvertFileName(r,report);
     ConvertFileName(l,template);
     ConvertFileName(StatName,log);
-//    CallService(MS_UTILS_PATHTOABSOLUTE,dword(r),dword(@report));
-//    CallService(MS_UTILS_PATHTOABSOLUTE,dword(l),dword(@template));
-//    CallService(MS_UTILS_PATHTOABSOLUTE,dword(StatName),dword(@log));
     if DoAddExt=BST_CHECKED then
       ChangeExt(report,'htm');
     if StatOut(report,log,template) then
diff --git a/plugins/Watrack/waticons.pas b/plugins/Watrack/waticons.pas
index 5b61af18dd..94b511767e 100644
--- a/plugins/Watrack/waticons.pas
+++ b/plugins/Watrack/waticons.pas
@@ -51,14 +51,12 @@ var
 begin
   result:=true;
   sid.szDefaultFile.a:='icons\'+ICOCtrlName;
-//    ConvertFileName(sid.szDefaultFile.a,buf);
   CallService(MS_UTILS_PATHTOABSOLUTE,wparam(sid.szDefaultFile),lparam(@buf));
 
   hIconDLL:=LoadLibraryA(buf);
   if hIconDLL=0 then // not found
   begin
     sid.szDefaultFile.a:='plugins\'+ICOCtrlName;
-//      ConvertFileName(sid.szDefaultFile.a,buf);
     CallService(MS_UTILS_PATHTOABSOLUTE,wparam(sid.szDefaultFile),lparam(@buf));
     hIconDLL:=LoadLibraryA(buf);
   end;
@@ -107,7 +105,7 @@ const
     ((descr:'Play'               ;name:'WATrack_Play'   ; id:IDI_PLAY_NORMAL),
      (descr:'Play Hovered'       ;name:'WATrack_PlayH'  ; id:IDI_PLAY_HOVERED),
      (descr:'Play Pushed'        ;name:'WATrack_PlayP'  ; id:IDI_PLAY_PRESSED)),
-    
+
     ((descr:'Pause'              ;name:'WATrack_Pause'  ; id:IDI_PAUSE_NORMAL),
      (descr:'Pause Hovered'      ;name:'WATrack_PauseH' ; id:IDI_PAUSE_HOVERED),
      (descr:'Pause Pushed'       ;name:'WATrack_PauseP' ; id:IDI_PAUSE_PRESSED)),
@@ -144,14 +142,12 @@ begin
   if not IconsLoaded then
   begin
     path:='icons\'+ICOCtrlName;
-//    ConvertFileName(sid.szDefaultFile.a,buf);
     CallService(MS_UTILS_PATHTOABSOLUTE,wparam(path),lparam(@buf));
 
     hIconDLL:=LoadLibraryA(buf);
     if hIconDLL=0 then // not found
     begin
       sid.szDefaultFile.a:='plugins\'+ICOCtrlName;
-//      ConvertFileName(sid.szDefaultFile.a,buf);
       CallService(MS_UTILS_PATHTOABSOLUTE,wparam(path),lparam(@buf));
       hIconDLL:=LoadLibraryA(buf);
     end;
-- 
cgit v1.2.3