Add a hack for "Fantasy" from DDREx

[ccbs] / parse / parse-ddrfreak-songlist.pl

diff --git a/parse/parse-ddrfreak-songlist.pl b/parse/parse-ddrfreak-songlist.pl
index 4fc1975088497821c1dffdf6bb7bc9662362964f..9e404cfd85c27a64a150d31d20c1b1959c96ef67 100644 (file)
--- a/parse/parse-ddrfreak-songlist.pl
+++ b/parse/parse-ddrfreak-songlist.pl
@@ -80,6 +80,11 @@ while (<>) {
                or die "Parse error, line 11";
        my $dc = $1;
 
+       # Blarg, hack
+       if ($songname eq 'FANTASY') {
+               $songname = "$songname ($artist)";
+       }
+
        # minimal SQL escaping
        $songname =~ s/'/\\'/g;
        $artist =~ s/'/\\'/g;