Skip to content
Browse files

Expose /recording/find-by-artist

  • Loading branch information...
1 parent 64f8098 commit 70d8c367ee3a0e9bdc5ab0f50b2e712381fc614e @ocharles ocharles committed
Showing with 8 additions and 1 deletion.
  1. +1 −1 musicbrainz-data
  2. +5 −0 src/MusicBrainz/API/Recording.hs
  3. +1 −0 src/MusicBrainz/Service.hs
  4. +1 −0 test/suite/Handlers.hs
2 musicbrainz-data
@@ -1 +1 @@
-Subproject commit b9be8061ac19997f298bddc60cf397fd1f49ac90
+Subproject commit 64e9d690c61bd9e5a21ee9b784c87ede0d7c5bb2
View
5 src/MusicBrainz/API/Recording.hs
@@ -82,3 +82,8 @@ getRevision = Common.getRevision
--------------------------------------------------------------------------------
findRecordingTracks :: Form Text MusicBrainz [MB.RecordingUse]
findRecordingTracks = runApi $ MB.findRecordingTracks <$> "recording" .: coreRef
+
+
+--------------------------------------------------------------------------------
+findByArtist :: Form Text MusicBrainz [CoreEntity Recording]
+findByArtist = runApi $ MB.findByArtist <$> "artist" .: coreRef
View
1 src/MusicBrainz/Service.hs
@@ -276,6 +276,7 @@ serviceInit connInfo sessionStore =
, ("/label/view-revision", expose Label.viewRevision)
, ("/recording/create", expose Recording.create)
+ , ("/recording/find-by-artist", expose Recording.findByArtist)
, ("/recording/find-latest", expose Recording.findLatest)
, ("/recording/find-recording-tracks", expose Recording.findRecordingTracks)
, ("/recording/get-revision", expose Recording.getRevision)
View
1 test/suite/Handlers.hs
@@ -50,6 +50,7 @@ tests = map testHandlerExists
, "/label/view-relationships"
, "/label/view-revision"
, "/recording/create"
+ , "/recording/find-by-artist"
, "/recording/find-latest"
, "/recording/find-recording-tracks"
, "/recording/get-revision"

0 comments on commit 70d8c36

Please sign in to comment.
Something went wrong with that request. Please try again.