From 1b458d8b1f4723ce82bb74f2157982980274e79c Mon Sep 17 00:00:00 2001
From: jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Mon, 14 Jan 2008 12:27:38 +0000
Subject: tidy up sing mode, to be an enum now.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@794 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/UPlaylist.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'Game/Code/Classes/UPlaylist.pas')

diff --git a/Game/Code/Classes/UPlaylist.pas b/Game/Code/Classes/UPlaylist.pas
index 8d981065..2c09c493 100644
--- a/Game/Code/Classes/UPlaylist.pas
+++ b/Game/Code/Classes/UPlaylist.pas
@@ -9,6 +9,9 @@ interface
 {$I switches.inc}
                
 
+uses
+  USong;
+
 type
   TPlaylistItem = record
     Artist: String;
@@ -33,7 +36,7 @@ type
     private
 
     public
-      Mode:         Byte;     //Current Playlist Mode for SongScreen
+      Mode:         TSingMode;     //Current Playlist Mode for SongScreen
       CurPlayList:  Cardinal;
       CurItem:      Cardinal;
 
@@ -262,7 +265,7 @@ begin
 
   //Set CatSongsMode + Playlist Mode
   CatSongs.CatNumShow := -3;
-  Mode := 2;
+  Mode := smPlayListRandom;
 
   //Set CurPlaylist
   CurPlaylist := Index;
-- 
cgit v1.2.3