How to connect to git lfs file on github?

Ok so implementation for GitHub connector is:

[DataSource.Kind = "GitHub", Publish = "GitHub.Publish"]
shared GitHub.Contents = Value.ReplaceType(
    GitHubContentsImpl,
    type function (
        repo     as (type text meta [Documentation.FieldCaption="Repository (e.g. org/repo)", DataSource.Path=false]),
        filePath as (type text meta [Documentation.FieldCaption="File path in repo", DataSource.Path=false]),
        optional branch as (type nullable text meta [Documentation.FieldCaption="Branch (optional)", DataSource.Path=false])
    ) as any
);

GitHubContentsImpl = (repo as text, filePath as text, optional branch as nullable text) =>
    let
        actualBranch = if branch <> null then branch else "main",
        baseUrl = "https://api.github.com",
        relativeUrl  = "repos/xxx/" & repo & "/contents/" & filePath & "?ref=" & actualBranch,

        response = Json.Document(Web.Contents(baseUrl, [
            RelativePath = relativeUrl,
            Headers = [
                #"Authorization" = "Bearer " & Extension.CurrentCredential()[access_token],
                #"User-Agent" = "PowerQuery"
            ]
        ]))
    in
        response;

GitHub = [
    TestConnection = () => { "https://api.github.com" },

and it worked, it is asking only once!!

What about GitHubCloud connector? How to make this the same?

// GitHubCloud Connector for Power BI (Standard GitHub OAuth)
[Version = "1.0.0"]
section GitHubCloud;

client_id = "11111";
client_secret = "222222";

[DataSource.Kind="GitHubCloud", Publish="GitHubCloud.Publish"]
shared GitHubCloud.LfsCsv = (relativePath as text, optional folderPath as text, optional branchName as text) =>
    let
        downloadUrl = 
            let
                sizeNumber = Number.FromText(folderPath),
                body = Json.FromValue([
                    operation = "download",
                    transfer = {"basic"},
                    objects = {
                        [ oid = relativePath, size = sizeNumber ]
                    }
                ]),
                UrlLfs = "xxxx" & "/" & branchName & ".git/info/lfs/objects/batch",
                result = Json.Document(Web.Contents("https://github.com", [
                    RelativePath = UrlLfs,
                    Content = body,
                    Headers = [
                        #"Authorization" = "Bearer " & Extension.CurrentCredential()[access_token],
                        #"Content-Type" = "application/vnd.git-lfs+json",
                        Accept = "application/vnd.git-lfs+json",
                        #"User-Agent" = "PowerQuery"
                    ]
                ])),
                url = result[objects]{0}[actions][download][href]
            in
                url,
        csvContent = Csv.Document(Web.Contents(downloadUrl)),
        final = Table.PromoteHeaders(csvContent)
    in
        final;

GitHubCloud = [
    TestConnection = (token) => {"https://github.com"},
    Authentication = [
        OAuth = [
            StartLogin = (resourceUrl, state, display) => [
                LoginUri = "https://github.com/login/oauth/authorize?" &
                    "client_id=" & client_id &
                    "&redirect_uri=https://oauth.powerbi.com/views/oauthredirect.html" &
                    "&scope=repo" &
                    "&state=" & state,
                CallbackUri = "https://oauth.powerbi.com/views/oauthredirect.html",
                WindowHeight = 720,
                WindowWidth = 1024,
                Context = null
            ],
            FinishLogin = (context, callbackUri, state) =>
                let
                    parts = Uri.Parts(callbackUri)[Query],
                    code = parts[code],
                    tokenResponse = Json.Document(Web.Contents("https://github.com/login/oauth/access_token", [
                        Content = Text.ToBinary("client_id=" & client_id & "&client_secret=" & client_secret & "&code=" & code),
                        Headers = [#"Content-Type"="application/x-www-form-urlencoded", Accept="application/json"]
                    ])),
                    access_token = tokenResponse[access_token]
                in
                    [access_token = access_token],
            Refresh = (resourceUrl, refresh_token) => error "GitHub doesn't support refresh tokens",
            AccessToken = (token) => "Bearer " & token[access_token]
        ]
    ],
    Label = "GitHub LFS OAuth Connector"
];

GitHubCloud.Publish = [
    Beta = true,
    Category = "Other",
    ButtonText = {"GitHubCloud", "Download LFS files"},
    SourceImage = GitHubCloud.Icons,
    SourceTypeImage = GitHubCloud.Icons
];

GitHubCloud.Icons = [
    Icon16 = { Extension.Contents("GitHub16.png"), Extension.Contents("GitHub20.png"), Extension.Contents("GitHub24.png"), Extension.Contents("GitHub32.png") },
    Icon32 = { Extension.Contents("GitHub32.png"), Extension.Contents("GitHub40.png"), Extension.Contents("GitHub48.png"), Extension.Contents("GitHub64.png") }
];

The problem here I am asking github twice. First is just github to get answer: 

result = Json.Document(Web.Contents("https://github.com", [​

but next one i am getting row url:

url = result[objects]{0}[actions][download][href] in url, csvContent = Csv.Document(Web.Contents(downloadUrl)),
final = Table.PromoteHeaders(csvContent)​

but here also i am asking Web.Contents once again and i think this is why power bi has to ask about credentials per table...So if i have 5 tables and each tables in repo i am asking about them 5 times, 5 times i need to use credentials for them.

how to avoid this? 

Best,
Jacek