Hello community,

here is the log from the commit of package ghc-gogol-drive for openSUSE:Factory 
checked in at 2017-08-31 20:53:13
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-gogol-drive (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-gogol-drive.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-gogol-drive"

Thu Aug 31 20:53:13 2017 rev:2 rq:513304 version:0.3.0

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-gogol-drive/ghc-gogol-drive.changes  
2017-05-10 20:40:46.429339201 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-gogol-drive.new/ghc-gogol-drive.changes     
2017-08-31 20:53:15.694409445 +0200
@@ -1,0 +2,5 @@
+Thu Jul 27 14:05:38 UTC 2017 - psim...@suse.com
+
+- Update to version 0.3.0.
+
+-------------------------------------------------------------------

Old:
----
  gogol-drive-0.1.1.tar.gz

New:
----
  gogol-drive-0.3.0.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-gogol-drive.spec ++++++
--- /var/tmp/diff_new_pack.ZpcPZY/_old  2017-08-31 20:53:16.658274018 +0200
+++ /var/tmp/diff_new_pack.ZpcPZY/_new  2017-08-31 20:53:16.682270646 +0200
@@ -18,7 +18,7 @@
 
 %global pkg_name gogol-drive
 Name:           ghc-%{pkg_name}
-Version:        0.1.1
+Version:        0.3.0
 Release:        0
 Summary:        Google Drive SDK
 License:        MPL-2.0

++++++ gogol-drive-0.1.1.tar.gz -> gogol-drive-0.3.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/gogol-drive-0.1.1/README.md 
new/gogol-drive-0.3.0/README.md
--- old/gogol-drive-0.1.1/README.md     2016-11-03 14:26:27.000000000 +0100
+++ new/gogol-drive-0.3.0/README.md     2017-07-12 16:45:06.000000000 +0200
@@ -8,7 +8,7 @@
 
 ## Version
 
-`0.1.1`
+`0.3.0`
 
 
 ## Description
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/gogol-drive-0.1.1/gen/Network/Google/Drive/Types/Product.hs 
new/gogol-drive-0.3.0/gen/Network/Google/Drive/Types/Product.hs
--- old/gogol-drive-0.1.1/gen/Network/Google/Drive/Types/Product.hs     
2016-11-03 14:26:27.000000000 +0100
+++ new/gogol-drive-0.3.0/gen/Network/Google/Drive/Types/Product.hs     
2017-07-12 16:45:06.000000000 +0200
@@ -48,7 +48,9 @@
     }
 
 -- | The page token for the next page of files. This will be absent if the
--- end of the files list has been reached.
+-- end of the files list has been reached. If the token is rejected for any
+-- reason, it should be discarded, and pagination should be restarted from
+-- the first page of results.
 flNextPageToken :: Lens' FileList (Maybe Text)
 flNextPageToken
   = lens _flNextPageToken
@@ -59,7 +61,8 @@
 flKind :: Lens' FileList Text
 flKind = lens _flKind (\ s a -> s{_flKind = a})
 
--- | The page of files.
+-- | The list of files. If nextPageToken is populated, then this list may be
+-- incomplete and an additional page of results should be fetched.
 flFiles :: Lens' FileList [File]
 flFiles
   = lens _flFiles (\ s a -> s{_flFiles = a}) . _Default
@@ -475,7 +478,9 @@
     }
 
 -- | The page token for the next page of replies. This will be absent if the
--- end of the replies list has been reached.
+-- end of the replies list has been reached. If the token is rejected for
+-- any reason, it should be discarded, and pagination should be restarted
+-- from the first page of results.
 rlNextPageToken :: Lens' ReplyList (Maybe Text)
 rlNextPageToken
   = lens _rlNextPageToken
@@ -486,7 +491,8 @@
 rlKind :: Lens' ReplyList Text
 rlKind = lens _rlKind (\ s a -> s{_rlKind = a})
 
--- | The page of replies.
+-- | The list of replies. If nextPageToken is populated, then this list may
+-- be incomplete and an additional page of results should be fetched.
 rlReplies :: Lens' ReplyList [Reply]
 rlReplies
   = lens _rlReplies (\ s a -> s{_rlReplies = a}) .
@@ -515,7 +521,7 @@
 --
 -- /See:/ 'fileContentHintsThumbnail' smart constructor.
 data FileContentHintsThumbnail = FileContentHintsThumbnail'
-    { _fchtImage    :: !(Maybe Base64)
+    { _fchtImage    :: !(Maybe Bytes)
     , _fchtMimeType :: !(Maybe Text)
     } deriving (Eq,Show,Data,Typeable,Generic)
 
@@ -538,7 +544,7 @@
 fchtImage :: Lens' FileContentHintsThumbnail (Maybe ByteString)
 fchtImage
   = lens _fchtImage (\ s a -> s{_fchtImage = a}) .
-      mapping _Base64
+      mapping _Bytes
 
 -- | The MIME type of the thumbnail.
 fchtMimeType :: Lens' FileContentHintsThumbnail (Maybe Text)
@@ -1034,13 +1040,16 @@
       (\ s a -> s{_clNewStartPageToken = a})
 
 -- | The page token for the next page of changes. This will be absent if the
--- end of the current changes list has been reached.
+-- end of the changes list has been reached. If the token is rejected for
+-- any reason, it should be discarded, and pagination should be restarted
+-- from the first page of results.
 clNextPageToken :: Lens' ChangeList (Maybe Text)
 clNextPageToken
   = lens _clNextPageToken
       (\ s a -> s{_clNextPageToken = a})
 
--- | The page of changes.
+-- | The list of changes. If nextPageToken is populated, then this list may
+-- be incomplete and an additional page of results should be fetched.
 clChanges :: Lens' ChangeList [Change]
 clChanges
   = lens _clChanges (\ s a -> s{_clChanges = a}) .
@@ -2246,6 +2255,7 @@
     , _fViewedByMe            :: !(Maybe Bool)
     , _fOwners                :: !(Maybe [User])
     , _fViewedByMeTime        :: !(Maybe DateTime')
+    , _fModifiedByMe          :: !(Maybe Bool)
     , _fSize                  :: !(Maybe (Textual Int64))
     , _fTrashed               :: !(Maybe Bool)
     , _fWebViewLink           :: !(Maybe Text)
@@ -2254,6 +2264,8 @@
     , _fKind                  :: !Text
     , _fLastModifyingUser     :: !(Maybe User)
     , _fIconLink              :: !(Maybe Text)
+    , _fHasThumbnail          :: !(Maybe Bool)
+    , _fThumbnailVersion      :: !(Maybe (Textual Int64))
     , _fImageMediaMetadata    :: !(Maybe FileImageMediaMetadata)
     , _fExplicitlyTrashed     :: !(Maybe Bool)
     , _fShared                :: !(Maybe Bool)
@@ -2305,6 +2317,8 @@
 --
 -- * 'fViewedByMeTime'
 --
+-- * 'fModifiedByMe'
+--
 -- * 'fSize'
 --
 -- * 'fTrashed'
@@ -2321,6 +2335,10 @@
 --
 -- * 'fIconLink'
 --
+-- * 'fHasThumbnail'
+--
+-- * 'fThumbnailVersion'
+--
 -- * 'fImageMediaMetadata'
 --
 -- * 'fExplicitlyTrashed'
@@ -2387,6 +2405,7 @@
     , _fViewedByMe = Nothing
     , _fOwners = Nothing
     , _fViewedByMeTime = Nothing
+    , _fModifiedByMe = Nothing
     , _fSize = Nothing
     , _fTrashed = Nothing
     , _fWebViewLink = Nothing
@@ -2395,6 +2414,8 @@
     , _fKind = "drive#file"
     , _fLastModifyingUser = Nothing
     , _fIconLink = Nothing
+    , _fHasThumbnail = Nothing
+    , _fThumbnailVersion = Nothing
     , _fImageMediaMetadata = Nothing
     , _fExplicitlyTrashed = Nothing
     , _fShared = Nothing
@@ -2430,7 +2451,8 @@
   = lens _fOwnedByMe (\ s a -> s{_fOwnedByMe = a})
 
 -- | A short-lived link to the file\'s thumbnail, if available. Typically
--- lasts on the order of hours.
+-- lasts on the order of hours. Only populated when the requesting app can
+-- access the file\'s content.
 fThumbnailLink :: Lens' File (Maybe Text)
 fThumbnailLink
   = lens _fThumbnailLink
@@ -2488,6 +2510,12 @@
       (\ s a -> s{_fViewedByMeTime = a})
       . mapping _DateTime
 
+-- | Whether the file has been modified by this user.
+fModifiedByMe :: Lens' File (Maybe Bool)
+fModifiedByMe
+  = lens _fModifiedByMe
+      (\ s a -> s{_fModifiedByMe = a})
+
 -- | The size of the file\'s content in bytes. This is only applicable to
 -- files with binary content in Drive.
 fSize :: Lens' File (Maybe Int64)
@@ -2537,6 +2565,19 @@
 fIconLink
   = lens _fIconLink (\ s a -> s{_fIconLink = a})
 
+-- | Whether this file has a thumbnail.
+fHasThumbnail :: Lens' File (Maybe Bool)
+fHasThumbnail
+  = lens _fHasThumbnail
+      (\ s a -> s{_fHasThumbnail = a})
+
+-- | The thumbnail version for use in thumbnail cache invalidation.
+fThumbnailVersion :: Lens' File (Maybe Int64)
+fThumbnailVersion
+  = lens _fThumbnailVersion
+      (\ s a -> s{_fThumbnailVersion = a})
+      . mapping _Coerce
+
 -- | Additional metadata about image media, if available.
 fImageMediaMetadata :: Lens' File (Maybe FileImageMediaMetadata)
 fImageMediaMetadata
@@ -2731,6 +2772,7 @@
                      <*> (o .:? "viewedByMe")
                      <*> (o .:? "owners" .!= mempty)
                      <*> (o .:? "viewedByMeTime")
+                     <*> (o .:? "modifiedByMe")
                      <*> (o .:? "size")
                      <*> (o .:? "trashed")
                      <*> (o .:? "webViewLink")
@@ -2739,6 +2781,8 @@
                      <*> (o .:? "kind" .!= "drive#file")
                      <*> (o .:? "lastModifyingUser")
                      <*> (o .:? "iconLink")
+                     <*> (o .:? "hasThumbnail")
+                     <*> (o .:? "thumbnailVersion")
                      <*> (o .:? "imageMediaMetadata")
                      <*> (o .:? "explicitlyTrashed")
                      <*> (o .:? "shared")
@@ -2780,6 +2824,7 @@
                   ("viewedByMe" .=) <$> _fViewedByMe,
                   ("owners" .=) <$> _fOwners,
                   ("viewedByMeTime" .=) <$> _fViewedByMeTime,
+                  ("modifiedByMe" .=) <$> _fModifiedByMe,
                   ("size" .=) <$> _fSize, ("trashed" .=) <$> _fTrashed,
                   ("webViewLink" .=) <$> _fWebViewLink,
                   ("createdTime" .=) <$> _fCreatedTime,
@@ -2787,6 +2832,8 @@
                   Just ("kind" .= _fKind),
                   ("lastModifyingUser" .=) <$> _fLastModifyingUser,
                   ("iconLink" .=) <$> _fIconLink,
+                  ("hasThumbnail" .=) <$> _fHasThumbnail,
+                  ("thumbnailVersion" .=) <$> _fThumbnailVersion,
                   ("imageMediaMetadata" .=) <$> _fImageMediaMetadata,
                   ("explicitlyTrashed" .=) <$> _fExplicitlyTrashed,
                   ("shared" .=) <$> _fShared,
@@ -2901,7 +2948,9 @@
     }
 
 -- | The page token for the next page of comments. This will be absent if the
--- end of the comments list has been reached.
+-- end of the comments list has been reached. If the token is rejected for
+-- any reason, it should be discarded, and pagination should be restarted
+-- from the first page of results.
 cllNextPageToken :: Lens' CommentList (Maybe Text)
 cllNextPageToken
   = lens _cllNextPageToken
@@ -2912,7 +2961,8 @@
 cllKind :: Lens' CommentList Text
 cllKind = lens _cllKind (\ s a -> s{_cllKind = a})
 
--- | The page of comments.
+-- | The list of comments. If nextPageToken is populated, then this list may
+-- be incomplete and an additional page of results should be fetched.
 cllComments :: Lens' CommentList [Comment]
 cllComments
   = lens _cllComments (\ s a -> s{_cllComments = a}) .
@@ -2964,7 +3014,9 @@
     }
 
 -- | The page token for the next page of revisions. This will be absent if
--- the end of the revisions list has been reached.
+-- the end of the revisions list has been reached. If the token is rejected
+-- for any reason, it should be discarded, and pagination should be
+-- restarted from the first page of results.
 rllNextPageToken :: Lens' RevisionList (Maybe Text)
 rllNextPageToken
   = lens _rllNextPageToken
@@ -2975,7 +3027,8 @@
 rllKind :: Lens' RevisionList Text
 rllKind = lens _rllKind (\ s a -> s{_rllKind = a})
 
--- | The full list of revisions.
+-- | The list of revisions. If nextPageToken is populated, then this list may
+-- be incomplete and an additional page of results should be fetched.
 rllRevisions :: Lens' RevisionList [Revision]
 rllRevisions
   = lens _rllRevisions (\ s a -> s{_rllRevisions = a})
@@ -3027,7 +3080,7 @@
 plKind :: Lens' PermissionList Text
 plKind = lens _plKind (\ s a -> s{_plKind = a})
 
--- | The full list of permissions.
+-- | The list of permissions.
 plPermissions :: Lens' PermissionList [Permission]
 plPermissions
   = lens _plPermissions
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/gogol-drive-0.1.1/gen/Network/Google/Drive/Types.hs 
new/gogol-drive-0.3.0/gen/Network/Google/Drive/Types.hs
--- old/gogol-drive-0.1.1/gen/Network/Google/Drive/Types.hs     2016-11-03 
14:26:27.000000000 +0100
+++ new/gogol-drive-0.3.0/gen/Network/Google/Drive/Types.hs     2017-07-12 
16:45:06.000000000 +0200
@@ -281,6 +281,7 @@
     , fViewedByMe
     , fOwners
     , fViewedByMeTime
+    , fModifiedByMe
     , fSize
     , fTrashed
     , fWebViewLink
@@ -289,6 +290,8 @@
     , fKind
     , fLastModifyingUser
     , fIconLink
+    , fHasThumbnail
+    , fThumbnailVersion
     , fImageMediaMetadata
     , fExplicitlyTrashed
     , fShared
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/gogol-drive-0.1.1/gen/Network/Google/Drive.hs 
new/gogol-drive-0.3.0/gen/Network/Google/Drive.hs
--- old/gogol-drive-0.1.1/gen/Network/Google/Drive.hs   2016-11-03 
14:26:27.000000000 +0100
+++ new/gogol-drive-0.3.0/gen/Network/Google/Drive.hs   2017-07-12 
16:45:06.000000000 +0200
@@ -393,6 +393,7 @@
     , fViewedByMe
     , fOwners
     , fViewedByMeTime
+    , fModifiedByMe
     , fSize
     , fTrashed
     , fWebViewLink
@@ -401,6 +402,8 @@
     , fKind
     , fLastModifyingUser
     , fIconLink
+    , fHasThumbnail
+    , fThumbnailVersion
     , fImageMediaMetadata
     , fExplicitlyTrashed
     , fShared
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/gogol-drive-0.1.1/gen/Network/Google/Resource/Drive/Revisions/List.hs 
new/gogol-drive-0.3.0/gen/Network/Google/Resource/Drive/Revisions/List.hs
--- old/gogol-drive-0.1.1/gen/Network/Google/Resource/Drive/Revisions/List.hs   
2016-11-03 14:26:27.000000000 +0100
+++ new/gogol-drive-0.3.0/gen/Network/Google/Resource/Drive/Revisions/List.hs   
2017-07-12 16:45:06.000000000 +0200
@@ -59,7 +59,7 @@
 data RevisionsList = RevisionsList'
     { _rllPageToken :: !(Maybe Text)
     , _rllFileId    :: !Text
-    , _rllPageSize  :: !(Maybe (Textual Int32))
+    , _rllPageSize  :: !(Textual Int32)
     } deriving (Eq,Show,Data,Typeable,Generic)
 
 -- | Creates a value of 'RevisionsList' with the minimum fields required to 
make a request.
@@ -78,7 +78,7 @@
     RevisionsList'
     { _rllPageToken = Nothing
     , _rllFileId = pRllFileId_
-    , _rllPageSize = Nothing
+    , _rllPageSize = 200
     }
 
 -- | The token for continuing a previous list request on the next page. This
@@ -94,10 +94,10 @@
   = lens _rllFileId (\ s a -> s{_rllFileId = a})
 
 -- | The maximum number of revisions to return per page.
-rllPageSize :: Lens' RevisionsList (Maybe Int32)
+rllPageSize :: Lens' RevisionsList Int32
 rllPageSize
   = lens _rllPageSize (\ s a -> s{_rllPageSize = a}) .
-      mapping _Coerce
+      _Coerce
 
 instance GoogleRequest RevisionsList where
         type Rs RevisionsList = RevisionList
@@ -110,7 +110,7 @@
                "https://www.googleapis.com/auth/drive.photos.readonly";,
                "https://www.googleapis.com/auth/drive.readonly";]
         requestClient RevisionsList'{..}
-          = go _rllFileId _rllPageToken _rllPageSize
+          = go _rllFileId _rllPageToken (Just _rllPageSize)
               (Just AltJSON)
               driveService
           where go
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/gogol-drive-0.1.1/gogol-drive.cabal 
new/gogol-drive-0.3.0/gogol-drive.cabal
--- old/gogol-drive-0.1.1/gogol-drive.cabal     2016-11-03 14:26:27.000000000 
+0100
+++ new/gogol-drive-0.3.0/gogol-drive.cabal     2017-07-12 16:45:06.000000000 
+0200
@@ -1,5 +1,5 @@
 name:                  gogol-drive
-version:               0.1.1
+version:               0.3.0
 synopsis:              Google Drive SDK.
 homepage:              https://github.com/brendanhay/gogol
 bug-reports:           https://github.com/brendanhay/gogol/issues
@@ -76,5 +76,5 @@
         , Network.Google.Drive.Types.Sum
 
     build-depends:
-          gogol-core == 0.1.1.*
+          gogol-core == 0.3.0.*
         , base       >= 4.7 && < 5


Reply via email to