summaryrefslogtreecommitdiff
path: root/plugins/Watrack/stat/statlog.pas
diff options
context:
space:
mode:
authorAlexey Kulakov <panda75@bk.ru>2015-01-28 06:34:10 +0000
committerAlexey Kulakov <panda75@bk.ru>2015-01-28 06:34:10 +0000
commit86dfe0c06437f79fd6f5bdfe34659339ef9cf525 (patch)
tree3509d18cf6fb2bc41688f4ea029260a14795d384 /plugins/Watrack/stat/statlog.pas
parent7690c901d9dd0e0992cdadebdeb817faa8358583 (diff)
Watrack:
VLC processing moved to INI-file MyShows fixes Code style fixes git-svn-id: http://svn.miranda-ng.org/main/trunk@11936 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Watrack/stat/statlog.pas')
-rw-r--r--plugins/Watrack/stat/statlog.pas18
1 files changed, 9 insertions, 9 deletions
diff --git a/plugins/Watrack/stat/statlog.pas b/plugins/Watrack/stat/statlog.pas
index 5ff486747c..f2064f42c2 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 direction=smReverse then
+ result:=Compare(Root^.Cells[First],Root^.Cells[Second],sort);
+ if aDirection=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;