Add a hack for "Fantasy" from DDREx

diff --git a/parse/parse-ddrfreak-songlist.pl b/parse/parse-ddrfreak-songlist.pl
index 4fc1975..9e404cf 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;