Use a map instead of a for loop when constructing discs in Serializer::JSON::2::Medium.

This also makes the code perl 5.10.x compatible.
Merge branch 'beta' of github.com:metabrainz/musicbrainz-server into beta