aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/USongs.pas
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-10-28 20:16:05 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-10-28 20:16:05 +0000
commit6585afce2ccd8e7c5ccb3bb3599d4723b00a0433 (patch)
tree463f04cca3f1a041569286559b2987698a457a54 /src/base/USongs.pas
parent4025ea3e81b0d2ec4492f3a0b3e374ce1568bdf5 (diff)
downloadusdx-6585afce2ccd8e7c5ccb3bb3599d4723b00a0433.tar.gz
usdx-6585afce2ccd8e7c5ccb3bb3599d4723b00a0433.tar.xz
usdx-6585afce2ccd8e7c5ccb3bb3599d4723b00a0433.zip
some compiler warnings/hints removed
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1485 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--src/base/USongs.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/base/USongs.pas b/src/base/USongs.pas
index 6f1f7c51..6f66bf3f 100644
--- a/src/base/USongs.pas
+++ b/src/base/USongs.pas
@@ -687,7 +687,7 @@ end;
procedure TCatSongs.ClickCategoryButton(Index: integer);
var
- Num, S: integer;
+ Num: integer;
begin
Num := CatSongs.Song[Index].OrderNum;
if Num <> CatNumShow then
@@ -703,7 +703,7 @@ end;
//Hide Categorys when in Category Hack
procedure TCatSongs.ShowCategoryList;
var
- Num, S: integer;
+ S: integer;
begin
// Hide All Songs Show All Cats
for S := 0 to high(CatSongs.Song) do