From 093a4a58c6b025ad8f4317f84f3f414f36daab5c Mon Sep 17 00:00:00 2001
From: Flameshadowxeroshin <flameshadowxeroshin@gmail.com>
Date: Sun, 4 Jun 2017 19:04:38 -0500
Subject: [PATCH] fix Select Music music updating it's remarkably fast over
 here, too.

---
 .../BGAnimations/ScreenTitleMenu underlay.lua | 23 ++++++++++++-------
 .../ScreenSelectMusic music (loop).redir      |  1 -
 2 files changed, 15 insertions(+), 9 deletions(-)
 delete mode 100644 DDR SN3/Sounds/ScreenSelectMusic music (loop).redir

diff --git a/DDR SN3/BGAnimations/ScreenTitleMenu underlay.lua b/DDR SN3/BGAnimations/ScreenTitleMenu underlay.lua
index e900163..30f6125 100644
--- a/DDR SN3/BGAnimations/ScreenTitleMenu underlay.lua	
+++ b/DDR SN3/BGAnimations/ScreenTitleMenu underlay.lua	
@@ -12,15 +12,22 @@ local t = Def.ActorFrame{
 };
 
 --update the select music redir here...
-local f = RageFileUtil.CreateRageFile()
-local worked = f:Open(THEME:GetCurrentThemeDirectory().."/Sounds/ScreenSelectMusic music (loop).redir", 10)
-if worked then
-  f:Write(GetMenuMusicPath("common",true))
-  f:Close()
-elseif SN3Debug then
-  SCREENMAN:SystemMessage("Couldn't open select music redir")
+if ThemePrefs.Get("MenuMusic") ~= CurrentMenuMusic then
+  if not CurrentMenuMusic then
+    CurrentMenuMusic = ThemePrefs.Get("MenuMusic")
+  else
+    local f = RageFileUtil.CreateRageFile()
+    local worked = f:Open(THEME:GetCurrentThemeDirectory().."/Sounds/ScreenSelectMusic music (loop).redir", 10)
+    if worked then
+      f:Write(GetMenuMusicPath("common",true))
+      f:Close()
+    elseif SN3Debug then
+      SCREENMAN:SystemMessage("Couldn't open select music redir")
+    end
+    f:destroy()
+    THEME:ReloadMetrics()
+  end
 end
-f:destroy()
 
 t[#t+1] = Def.ActorFrame{
   OnCommand=function(self)
diff --git a/DDR SN3/Sounds/ScreenSelectMusic music (loop).redir b/DDR SN3/Sounds/ScreenSelectMusic music (loop).redir
deleted file mode 100644
index fabf317..0000000
--- a/DDR SN3/Sounds/ScreenSelectMusic music (loop).redir	
+++ /dev/null
@@ -1 +0,0 @@
-_sn3 (loop).ogg
\ No newline at end of file