diff options
Diffstat (limited to 'src/screens/UScreenSing.pas')
-rw-r--r-- | src/screens/UScreenSing.pas | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/screens/UScreenSing.pas b/src/screens/UScreenSing.pas index bf3db3af..38c4762d 100644 --- a/src/screens/UScreenSing.pas +++ b/src/screens/UScreenSing.pas @@ -210,10 +210,13 @@ begin // show visualization Ord('V'): begin - if (fShowVisualization = false) and (fShowBackground = true) and (Ini.VideoEnabled = 1) and CurrentSong.Video.IsSet() then //only Background should be visible currently, switch to video + if ((fShowBackground = true) and (Ini.VideoEnabled = 1) and CurrentSong.Video.IsSet()) + or (fShowVisualization and not CurrentSong.Background.IsSet()) then //switch to video begin Log.LogStatus('decided to switch to video', 'UScreenSing.ParseInput'); fShowBackground := false; + fCurrentVideo := nil; + fShowVisualization := false; fCurrentVideo := fVideoClip; Log.LogStatus('finished switching to video', 'UScreenSing.ParseInput'); end |