}
}
- print OUT "EXTD=\n";
+ print OUT "EXTD=barcode=" . @{$release->release_event_list()->events()}[0]->barcode()
+ . " catalognumber=" . @{$release->release_event_list()->events()}[0]->catalog_number() . "\n";
for (my $i = 0; $i < scalar(@tracks); $i++) {
printf OUT "EXTT%d=\n", $i;
}