fixed lineNo in error reporting;

fixed videopreview after singing or editing

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2171 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 6 insertions, 4 deletions

diff --git a/Game/Code/Screens/UScreenSong.pas b/Game/Code/Screens/UScreenSong.pas
index 9751b042..52e679b5 100644
--- a/Game/Code/Screens/UScreenSong.pas
+++ b/Game/Code/Screens/UScreenSong.pas
@@ -1807,7 +1807,7 @@ begin
     (PlaylistMan.Mode=0) then

   begin

     CatSongs.ShowCategoryList;

-    SelectNext;

+    //SelectNext;

     //Show Cat in Top Left Mod

     HideCatTL;

   end else if (PlaylistMan.Mode=0) and (Ini.Tabs_at_startup = 1) AND (CatSongs.CatNumShow = -3) then

@@ -1944,11 +1944,13 @@ begin
 

   if Length(CatSongs.Song) > 0 then begin

     if SongIndex<>Interaction then

-      ChangeMusic

-    else

     begin

-      StartVideoPreview;

       CoverTime := 0;

+      ChangeMusic;

+    end else

+    begin

+      CoverTime := 0;

+      StartVideoPreview;

       LoadTop;

     end;