gopro-plus 0.6.2.1 → 0.6.3.0
raw patch · 2 files changed
+11/−3 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
+ GoPro.Plus.Media: [_medium_filename] :: Medium -> Maybe String
+ GoPro.Plus.Media: medium_filename :: Lens' Medium (Maybe String)
+ GoPro.Plus.Media: notReady :: (HasGoProAuth m, MonadIO m) => m [Medium]
- GoPro.Plus.Media: Medium :: MediumID -> Maybe String -> UTCTime -> UTCTime -> Maybe Int -> Int -> ReadyToViewType -> Maybe String -> MediumType -> String -> Maybe Int -> Maybe Int -> Medium
+ GoPro.Plus.Media: Medium :: MediumID -> Maybe String -> UTCTime -> UTCTime -> Maybe Int -> Int -> ReadyToViewType -> Maybe String -> MediumType -> String -> Maybe Int -> Maybe Int -> Maybe String -> Medium
Files
- gopro-plus.cabal +2/−2
- src/GoPro/Plus/Media.hs +9/−1
gopro-plus.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 87bd8a0ef055649ead5b4800185675050d93de453e6dc6a6eb9a0f9af0e3cd68+-- hash: 4b8171c3664ca2d80b16127aa8c4561de17e833b114f5dce17fb18304029d77f name: gopro-plus-version: 0.6.2.1+version: 0.6.3.0 synopsis: GoPro Plus Client API. description: Please see the README on GitHub at <https://github.com/dustin/gopro-plus#readme> category: Web
src/GoPro/Plus/Media.hs view
@@ -16,6 +16,7 @@ module GoPro.Plus.Media ( -- * Accessing Data list, listAll, listWhile, medium,+ notReady, retrieve, delete, fetchThumbnail, -- * Data Types@@ -24,7 +25,7 @@ Medium(..), medium_id, medium_camera_model, medium_captured_at, medium_created_at, medium_file_size, medium_moments_count, medium_ready_to_view, medium_source_duration, medium_type,- medium_token, medium_width, medium_height,+ medium_token, medium_width, medium_height, medium_filename, Listing(..), media, pages, HasMediaURL(..), HasMediaHead(..), HasMediaLabel(..), HasMediaType(..), HasMediaItemNumber(..), File(..), file_camera_position, file_height, file_width,@@ -142,6 +143,7 @@ , _medium_token :: String , _medium_width :: Maybe Int , _medium_height :: Maybe Int+ , _medium_filename :: Maybe String } deriving (Generic, Eq, Show) @@ -212,6 +214,12 @@ if (not . null) ms && f ms then dig (n + 1) m' else pure m'++-- | Get a list of items whose processing is failed or incomplete.+--+-- This includes items that are currently uploading, or items that will not upload.+notReady :: (HasGoProAuth m, MonadIO m) => m [Medium]+notReady = toListOf (media . folded) <$> jgetAuth "https://api.gopro.com/media/filters/not-ready?page=1&per_page=200" class HasMediaURL c where media_url :: Lens' c String