Fix @Music.Stop not working

This commit is contained in:
JappaWakka 2024-02-29 12:38:33 +01:00
parent 32be5bbb67
commit 344b65fe7e
1 changed files with 2 additions and 4 deletions

View File

@ -332,9 +332,7 @@ Public Class MusicManager
End Sub
Public Shared Sub [Stop]()
Playlist.Clear()
MusicManager.Play("Silence", False, 0.0F)
_isIntroStarted = False
ClearCurrentlyPlaying()
End Sub
Public Shared Sub ResumePlayback()
@ -423,7 +421,7 @@ Public Class MusicManager
Dim songName = GetSongName(song)
Dim AfterBattleIntroSongName As String = GetSongName(AfterBattleIntroSong)
If currentSong = "Silence" OrElse currentSong <> songName Then
If currentSong = "silence" OrElse currentSong <> songName Then
If AfterBattleIntroSongName <> "" Then
Dim battleIntroSong = GetSong(songName)
Dim regularIntroSong = GetSong("intro\" + AfterBattleIntroSongName)