Added Support for Map-Bundled music. (beyond-all-reason#4888)

Put your music in the map archive in the following path: 
music/map/loading
music/map/peace
music/map/warlow
music/map/warhigh

Author: Damgam

luaintro/Addons/music.lua

@@ -63,6 +63,9 @@ function addon.Initialize()
 				table.append(musicPlaylist, VFS.DirList(musicDirOriginal..'/events/aprilfools/loading', allowedExtensions))
 			end
 
+			-- Map Music
+			table.append(musicPlaylistEvent, VFS.DirList('music/map/loading', allowedExtensions))
+
 			-------------------------------------------------------------------------------------------------------------------------------
 
 			-- Regular Music

luaui/Widgets/gui_advplayerslist_music_new.lua

@@ -183,6 +183,16 @@ local function ReloadMusicPlaylists()
 
 		-- Christmas ----------------------------------------------------------------------------------------------------------------------
 		table.append(bonusTracks, VFS.DirList(musicDirNew..'/events/xmas/menu', allowedExtensions))
+
+		-- Map Music
+		table.append(eventPeaceTracks, VFS.DirList('music/map/peace', allowedExtensions))
+		table.append(eventWarLowTracks, VFS.DirList('music/map/warlow', allowedExtensions))
+		table.append(eventWarHighTracks, VFS.DirList('music/map/warhigh', allowedExtensions))
+
+		table.append(bonusTracks, VFS.DirList('music/map/loading', allowedExtensions))
+		table.append(bonusTracks, VFS.DirList('music/map/peace', allowedExtensions))
+		table.append(bonusTracks, VFS.DirList('music/map/warlow', allowedExtensions))
+		table.append(bonusTracks, VFS.DirList('music/map/warhigh', allowedExtensions))
 	end
 
 	-------------------------------CREATE PLAYLISTS-----------------------------------