From 1b816ea00f6a748710761bf0145aab84416bf14e Mon Sep 17 00:00:00 2001
From: brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 9 Jun 2010 16:06:17 +0000
Subject: - added "VideoPreview" option (on/off) - removed some test comments

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2468 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 VideoPreview/src/screens/UScreenSong.pas | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'VideoPreview/src/screens/UScreenSong.pas')

diff --git a/VideoPreview/src/screens/UScreenSong.pas b/VideoPreview/src/screens/UScreenSong.pas
index d7f309c7..1171eaa9 100644
--- a/VideoPreview/src/screens/UScreenSong.pas
+++ b/VideoPreview/src/screens/UScreenSong.pas
@@ -1837,6 +1837,9 @@ var
   Song:       TSong;
 
 begin
+  if (Ini.VideoPreview=0)  then
+    Exit;
+
   if Assigned(fCurrentVideo) then
   begin
     fCurrentVideo.Stop();
-- 
cgit v1.2.3