diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-10-28 20:16:05 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-10-28 20:16:05 +0000 |
commit | 6585afce2ccd8e7c5ccb3bb3599d4723b00a0433 (patch) | |
tree | 463f04cca3f1a041569286559b2987698a457a54 /src/base/USongs.pas | |
parent | 4025ea3e81b0d2ec4492f3a0b3e374ce1568bdf5 (diff) | |
download | usdx-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.pas | 4 |
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 |