musicScroll-0.2.3.0: src/MusicScroll/Providers/Utils.hs

{-# language DataKinds #-}
module MusicScroll.Providers.Utils where

import Data.Text (Text)
import MusicScroll.TrackInfo (TrackInfo)
import Network.HTTP.Req

newtype Lyrics = Lyrics Text

data Provider = Provider
  { toUrl :: TrackInfo -> Url 'Https
  , extractLyricsFromPage :: Text -> Lyrics
  }