--- /usr/games/bin/frozen-bubble	2005-04-03 01:15:53.000000000 -0600
+++ ./frozen-bubble	2005-04-03 03:47:45.000000000 -0500
@@ -163,8 +163,10 @@
 
 sub get_sound {
 	my ($sound) = @_;
-	if (ref($sound) eq 'HASH') {
+	if (ref($sound) eq 'SDL::Sound') {
 		return $sound{$_}{-data};
+	} elsif (ref($sound) eq 'SDL::Music') {
+		return $sound->{-data};
 	} else {
 		return $$sound;
 	}