1- (* Warning! This file is generated. Modify at your own risk. *)
1+ (* Warning! This file is generated. Modify at your own risk.
2+ *)
23
34module TeamDrive =
45struct
@@ -2309,6 +2310,56 @@ struct
23092310
23102311 end
23112312
2313+ module ShortcutDetails =
2314+ struct
2315+ type t = {
2316+ targetId : string ;
2317+ targetMimeType : string ;
2318+
2319+ }
2320+
2321+ let targetId = {
2322+ GapiLens. get = (fun x -> x.targetId);
2323+ GapiLens. set = (fun v x -> { x with targetId = v });
2324+ }
2325+ let targetMimeType = {
2326+ GapiLens. get = (fun x -> x.targetMimeType);
2327+ GapiLens. set = (fun v x -> { x with targetMimeType = v });
2328+ }
2329+
2330+ let empty = {
2331+ targetId = " " ;
2332+ targetMimeType = " " ;
2333+
2334+ }
2335+
2336+ let rec render_content x =
2337+ [
2338+ GapiJson. render_string_value " targetId" x.targetId;
2339+ GapiJson. render_string_value " targetMimeType" x.targetMimeType;
2340+
2341+ ]
2342+ and render x =
2343+ GapiJson. render_object " " (render_content x)
2344+
2345+ let rec parse x = function
2346+ | GapiCore.AnnotatedTree. Leaf
2347+ ({ GapiJson. name = " targetId" ; data_type = GapiJson. Scalar },
2348+ `String v) ->
2349+ { x with targetId = v }
2350+ | GapiCore.AnnotatedTree. Leaf
2351+ ({ GapiJson. name = " targetMimeType" ; data_type = GapiJson. Scalar },
2352+ `String v) ->
2353+ { x with targetMimeType = v }
2354+ | GapiCore.AnnotatedTree. Node
2355+ ({ GapiJson. name = " " ; data_type = GapiJson. Object },
2356+ cs) ->
2357+ GapiJson. parse_children parse empty (fun x -> x) cs
2358+ | e ->
2359+ GapiJson. unexpected " GapiDriveV3Model.ShortcutDetails.parse" e x
2360+
2361+ end
2362+
23122363 module ImageMediaMetadata =
23132364 struct
23142365 module Location =
@@ -2773,6 +2824,7 @@ struct
27732824 struct
27742825 type t = {
27752826 canAddChildren : bool ;
2827+ canAddMyDriveParent : bool ;
27762828 canChangeCopyRequiresWriterPermission : bool ;
27772829 canChangeViewersCanCopyContent : bool ;
27782830 canComment : bool ;
@@ -2782,6 +2834,7 @@ struct
27822834 canDownload : bool ;
27832835 canEdit : bool ;
27842836 canListChildren : bool ;
2837+ canModifyContent : bool ;
27852838 canMoveChildrenOutOfDrive : bool ;
27862839 canMoveChildrenOutOfTeamDrive : bool ;
27872840 canMoveChildrenWithinDrive : bool ;
@@ -2796,6 +2849,7 @@ struct
27962849 canReadRevisions : bool ;
27972850 canReadTeamDrive : bool ;
27982851 canRemoveChildren : bool ;
2852+ canRemoveMyDriveParent : bool ;
27992853 canRename : bool ;
28002854 canShare : bool ;
28012855 canTrash : bool ;
@@ -2808,6 +2862,10 @@ struct
28082862 GapiLens. get = (fun x -> x.canAddChildren);
28092863 GapiLens. set = (fun v x -> { x with canAddChildren = v });
28102864 }
2865+ let canAddMyDriveParent = {
2866+ GapiLens. get = (fun x -> x.canAddMyDriveParent);
2867+ GapiLens. set = (fun v x -> { x with canAddMyDriveParent = v });
2868+ }
28112869 let canChangeCopyRequiresWriterPermission = {
28122870 GapiLens. get = (fun x -> x.canChangeCopyRequiresWriterPermission);
28132871 GapiLens. set = (fun v x -> { x with canChangeCopyRequiresWriterPermission = v });
@@ -2844,6 +2902,10 @@ struct
28442902 GapiLens. get = (fun x -> x.canListChildren);
28452903 GapiLens. set = (fun v x -> { x with canListChildren = v });
28462904 }
2905+ let canModifyContent = {
2906+ GapiLens. get = (fun x -> x.canModifyContent);
2907+ GapiLens. set = (fun v x -> { x with canModifyContent = v });
2908+ }
28472909 let canMoveChildrenOutOfDrive = {
28482910 GapiLens. get = (fun x -> x.canMoveChildrenOutOfDrive);
28492911 GapiLens. set = (fun v x -> { x with canMoveChildrenOutOfDrive = v });
@@ -2900,6 +2962,10 @@ struct
29002962 GapiLens. get = (fun x -> x.canRemoveChildren);
29012963 GapiLens. set = (fun v x -> { x with canRemoveChildren = v });
29022964 }
2965+ let canRemoveMyDriveParent = {
2966+ GapiLens. get = (fun x -> x.canRemoveMyDriveParent);
2967+ GapiLens. set = (fun v x -> { x with canRemoveMyDriveParent = v });
2968+ }
29032969 let canRename = {
29042970 GapiLens. get = (fun x -> x.canRename);
29052971 GapiLens. set = (fun v x -> { x with canRename = v });
@@ -2923,6 +2989,7 @@ struct
29232989
29242990 let empty = {
29252991 canAddChildren = false ;
2992+ canAddMyDriveParent = false ;
29262993 canChangeCopyRequiresWriterPermission = false ;
29272994 canChangeViewersCanCopyContent = false ;
29282995 canComment = false ;
@@ -2932,6 +2999,7 @@ struct
29322999 canDownload = false ;
29333000 canEdit = false ;
29343001 canListChildren = false ;
3002+ canModifyContent = false ;
29353003 canMoveChildrenOutOfDrive = false ;
29363004 canMoveChildrenOutOfTeamDrive = false ;
29373005 canMoveChildrenWithinDrive = false ;
@@ -2946,6 +3014,7 @@ struct
29463014 canReadRevisions = false ;
29473015 canReadTeamDrive = false ;
29483016 canRemoveChildren = false ;
3017+ canRemoveMyDriveParent = false ;
29493018 canRename = false ;
29503019 canShare = false ;
29513020 canTrash = false ;
@@ -2957,6 +3026,7 @@ struct
29573026 let rec render_content x =
29583027 [
29593028 GapiJson. render_bool_value " canAddChildren" x.canAddChildren;
3029+ GapiJson. render_bool_value " canAddMyDriveParent" x.canAddMyDriveParent;
29603030 GapiJson. render_bool_value " canChangeCopyRequiresWriterPermission" x.canChangeCopyRequiresWriterPermission;
29613031 GapiJson. render_bool_value " canChangeViewersCanCopyContent" x.canChangeViewersCanCopyContent;
29623032 GapiJson. render_bool_value " canComment" x.canComment;
@@ -2966,6 +3036,7 @@ struct
29663036 GapiJson. render_bool_value " canDownload" x.canDownload;
29673037 GapiJson. render_bool_value " canEdit" x.canEdit;
29683038 GapiJson. render_bool_value " canListChildren" x.canListChildren;
3039+ GapiJson. render_bool_value " canModifyContent" x.canModifyContent;
29693040 GapiJson. render_bool_value " canMoveChildrenOutOfDrive" x.canMoveChildrenOutOfDrive;
29703041 GapiJson. render_bool_value " canMoveChildrenOutOfTeamDrive" x.canMoveChildrenOutOfTeamDrive;
29713042 GapiJson. render_bool_value " canMoveChildrenWithinDrive" x.canMoveChildrenWithinDrive;
@@ -2980,6 +3051,7 @@ struct
29803051 GapiJson. render_bool_value " canReadRevisions" x.canReadRevisions;
29813052 GapiJson. render_bool_value " canReadTeamDrive" x.canReadTeamDrive;
29823053 GapiJson. render_bool_value " canRemoveChildren" x.canRemoveChildren;
3054+ GapiJson. render_bool_value " canRemoveMyDriveParent" x.canRemoveMyDriveParent;
29833055 GapiJson. render_bool_value " canRename" x.canRename;
29843056 GapiJson. render_bool_value " canShare" x.canShare;
29853057 GapiJson. render_bool_value " canTrash" x.canTrash;
@@ -2995,6 +3067,10 @@ struct
29953067 ({ GapiJson. name = " canAddChildren" ; data_type = GapiJson. Scalar },
29963068 `Bool v) ->
29973069 { x with canAddChildren = v }
3070+ | GapiCore.AnnotatedTree. Leaf
3071+ ({ GapiJson. name = " canAddMyDriveParent" ; data_type = GapiJson. Scalar },
3072+ `Bool v) ->
3073+ { x with canAddMyDriveParent = v }
29983074 | GapiCore.AnnotatedTree. Leaf
29993075 ({ GapiJson. name = " canChangeCopyRequiresWriterPermission" ; data_type = GapiJson. Scalar },
30003076 `Bool v) ->
@@ -3031,6 +3107,10 @@ struct
30313107 ({ GapiJson. name = " canListChildren" ; data_type = GapiJson. Scalar },
30323108 `Bool v) ->
30333109 { x with canListChildren = v }
3110+ | GapiCore.AnnotatedTree. Leaf
3111+ ({ GapiJson. name = " canModifyContent" ; data_type = GapiJson. Scalar },
3112+ `Bool v) ->
3113+ { x with canModifyContent = v }
30343114 | GapiCore.AnnotatedTree. Leaf
30353115 ({ GapiJson. name = " canMoveChildrenOutOfDrive" ; data_type = GapiJson. Scalar },
30363116 `Bool v) ->
@@ -3087,6 +3167,10 @@ struct
30873167 ({ GapiJson. name = " canRemoveChildren" ; data_type = GapiJson. Scalar },
30883168 `Bool v) ->
30893169 { x with canRemoveChildren = v }
3170+ | GapiCore.AnnotatedTree. Leaf
3171+ ({ GapiJson. name = " canRemoveMyDriveParent" ; data_type = GapiJson. Scalar },
3172+ `Bool v) ->
3173+ { x with canRemoveMyDriveParent = v }
30903174 | GapiCore.AnnotatedTree. Leaf
30913175 ({ GapiJson. name = " canRename" ; data_type = GapiJson. Scalar },
30923176 `Bool v) ->
@@ -3155,6 +3239,7 @@ struct
31553239 shared : bool ;
31563240 sharedWithMeTime : GapiDate .t ;
31573241 sharingUser : User .t ;
3242+ shortcutDetails : ShortcutDetails .t ;
31583243 size : int64 ;
31593244 spaces : string list ;
31603245 starred : bool ;
@@ -3327,6 +3412,10 @@ struct
33273412 GapiLens. get = (fun x -> x.sharingUser);
33283413 GapiLens. set = (fun v x -> { x with sharingUser = v });
33293414 }
3415+ let shortcutDetails = {
3416+ GapiLens. get = (fun x -> x.shortcutDetails);
3417+ GapiLens. set = (fun v x -> { x with shortcutDetails = v });
3418+ }
33303419 let size = {
33313420 GapiLens. get = (fun x -> x.size);
33323421 GapiLens. set = (fun v x -> { x with size = v });
@@ -3435,6 +3524,7 @@ struct
34353524 shared = false ;
34363525 sharedWithMeTime = GapiDate. epoch;
34373526 sharingUser = User. empty;
3527+ shortcutDetails = ShortcutDetails. empty;
34383528 size = 0L ;
34393529 spaces = [] ;
34403530 starred = false ;
@@ -3495,6 +3585,7 @@ struct
34953585 GapiJson. render_bool_value " shared" x.shared;
34963586 GapiJson. render_date_value " sharedWithMeTime" x.sharedWithMeTime;
34973587 (fun v -> GapiJson. render_object " sharingUser" (User. render_content v)) x.sharingUser;
3588+ (fun v -> GapiJson. render_object " shortcutDetails" (ShortcutDetails. render_content v)) x.shortcutDetails;
34983589 GapiJson. render_int64_value " size" x.size;
34993590 GapiJson. render_array " spaces" (GapiJson. render_string_value " " ) x.spaces;
35003591 GapiJson. render_bool_value " starred" x.starred;
@@ -3764,6 +3855,14 @@ struct
37643855 User. empty
37653856 (fun v -> { x with sharingUser = v })
37663857 cs
3858+ | GapiCore.AnnotatedTree. Node
3859+ ({ GapiJson. name = " shortcutDetails" ; data_type = GapiJson. Object },
3860+ cs) ->
3861+ GapiJson. parse_children
3862+ ShortcutDetails. parse
3863+ ShortcutDetails. empty
3864+ (fun v -> { x with shortcutDetails = v })
3865+ cs
37673866 | GapiCore.AnnotatedTree. Leaf
37683867 ({ GapiJson. name = " size" ; data_type = GapiJson. Scalar },
37693868 `String v) ->
0 commit comments