pascal code: reformat, small fixes

git-svn-id: http://svn.miranda-ng.org/main/trunk@11700 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 4 insertions, 4 deletions

diff --git a/plugins/Watrack/i_cover.inc b/plugins/Watrack/i_cover.inc
index 1a07b21637..96aec9da47 100644
--- a/plugins/Watrack/i_cover.inc
+++ b/plugins/Watrack/i_cover.inc
@@ -1,5 +1,5 @@
 {any utils}

-function GetCover(var dst:pWideChar;mfile:pWideChar):boolean;

+function GetCover(var dst:pWideChar;MFile:pWideChar):boolean;

 var

   line,line1:array [0..511] of WideChar;

   p,p1:PWideChar;

@@ -31,7 +31,7 @@ begin
       end

       else

       begin

-        wr1:=ExtractW(mfile,false);

+        wr1:=ExtractW(MFile,false);

         StrCopyW(line,wr1);

         mFreeMem(wr1);

         StrCatW(line,wr);

@@ -60,14 +60,14 @@ begin
   until p^=#0;

 end;

 

-function GetLyric(var dst:pWideChar;mfile:pWideChar):boolean;

+function GetLyric(var dst:pWideChar;MFile:pWideChar):boolean;

 var

   buf:array [0..511] of WideChar;

   f:THANDLE;

   size:integer;

   tmp:PAnsiChar;

 begin

-  StrCopyW(buf,mfile);

+  StrCopyW(buf,MFile);

   ChangeExtW(buf,'txt');

   f:=Reset(buf);

   if f=THANDLE(INVALID_HANDLE_VALUE) then