From a0da988918b3dad894afedba4fe74689b5ba91c4 Mon Sep 17 00:00:00 2001
From: Glenn Maynard <gmaynard@users.sourceforge.net>
Date: Sun, 25 Sep 2005 01:41:26 +0000
Subject: [PATCH] GetRandomSongBackground

---
 stepmania/Themes/default/Scripts/Utilities.lua | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/stepmania/Themes/default/Scripts/Utilities.lua b/stepmania/Themes/default/Scripts/Utilities.lua
index 6ea84e8a4d..fa09a6b16a 100644
--- a/stepmania/Themes/default/Scripts/Utilities.lua
+++ b/stepmania/Themes/default/Scripts/Utilities.lua
@@ -86,6 +86,17 @@ function tableshuffle( t )
 	return ret
 end
 
+function GetRandomSongBackground()
+	for i=0,50 do
+		local song = SONGMAN:GetRandomSong()
+		if song then
+			local path = song:GetBackgroundPath()
+			if path then return path end
+		end
+	end
+	return THEME:GetPathG("", "_blank")
+end
+
 -- (c) 2005 Glenn Maynard, Chris Danford
 -- All rights reserved.
 --