diff --git a/src/hollywoo_flixel/FlxDirector.kiss b/src/hollywoo_flixel/FlxDirector.kiss
index 3e083bf..c7ad59d 100644
--- a/src/hollywoo_flixel/FlxDirector.kiss
+++ b/src/hollywoo_flixel/FlxDirector.kiss
@@ -814,7 +814,9 @@
         (unless waitForEnd (cc))))
 
 (method :Void changeSongVolume [:Float volumeMod :Continuation cc]
-    (set music.volume (* volumeMod musicVolume))
+    (let [[fade oldMod] (dictGet currentSoundVolumes music)]
+        (set music.volume (* fade volumeMod musicVolume))
+        (dictSet currentSoundVolumes music [fade volumeMod]))
     (cc))
 
 (method :Void stopSong []