1 files changed, 9 insertions, 9 deletions
diff --git a/plugins/Watrack/stat/statlog.pas b/plugins/Watrack/stat/statlog.pas
index f2064f42c2..5ff486747c 100644
--- a/plugins/Watrack/stat/statlog.pas
+++ b/plugins/Watrack/stat/statlog.pas
@@ -23,7 +23,7 @@ type
     Title    :PAnsiChar;
     MFile    :PAnsiChar;
     Album    :PAnsiChar;
-    Next     :pStatCell; // only for fill
+    next     :pStatCell; // only for fill
   end;
 
 type
@@ -269,12 +269,12 @@ begin
   result:=0;
 end;
 
-procedure Resort(var Root:pCells;Sort:integer;aDirection:integer=smDirect);
+procedure Resort(var Root:pCells;sort:integer;adirection:integer=smDirect);
 
   function CompareProc(First,Second:integer):integer;
   begin
-    result:=Compare(Root^.Cells[First],Root^.Cells[Second],sort);
-    if aDirection=smReverse then
+    result:=Compare(Root^.cells[First],Root^.cells[Second],sort);
+    if direction=smReverse then
       result:=-result;
   end;
 
@@ -356,7 +356,7 @@ begin
         end
         else
         begin
-          CurCell^.Next:=Cell;
+          CurCell^.next:=Cell;
           CurCell:=Cell;
         end;
       end;
@@ -374,7 +374,7 @@ begin
     while CurCell<>nil do
     begin
       arr^.Cells[i]:=CurCell;
-      CurCell:=CurCell.Next;
+      CurCell:=CurCell.next;
       inc(i);
     end;
     result:=arr;
@@ -406,7 +406,7 @@ begin
   end;
 end;
 
-procedure SortFile(fname:PAnsiChar;mode:integer;aDirection:integer);
+procedure SortFile(fname:PAnsiChar;mode:integer;adirection:integer);
 var
   Root:pCells;
   buf:PAnsiChar;
@@ -418,8 +418,8 @@ begin
   Root:=BuildTree(buf1,buf);
   if Root<>nil then
   begin
-    if (mode<>stArtist) or (aDirection<>smDirect) then
-      Resort(Root,mode,aDirection);
+    if (mode<>stArtist) or (adirection<>smDirect) then
+      Resort(Root,mode,adirection);
     OutputStat(buf1,Root);
     ClearStatCells(Root);
   end;