lua/mason-registry/visualforce-language-server/init.lua


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

local Pkg = require "mason-core.package"
local github = require "mason-core.managers.github"
local github_client = require "mason-core.managers.github.client"
local Optional = require "mason-core.optional"
local _ = require "mason-core.functional"

return Pkg.new {
    name = "visualforce-language-server",
    desc = [[Visualforce language server]],
    homepage = "https://github.com/forcedotcom/salesforcedx-vscode",
    languages = { Pkg.Lang.Visualforce },
    categories = { Pkg.Cat.LSP },
    ---@async
    install = function()
        local repo = "forcedotcom/salesforcedx-vscode"

        -- See https://github.com/forcedotcom/salesforcedx-vscode/issues/4184#issuecomment-1146052086
        ---@type GitHubRelease
        local release = github_client
            .fetch_releases(repo)
            :map(_.find_first(_.prop_satisfies(_.compose(_.gt(0), _.length), "assets")))
            :map(Optional.of_nilable)
            :get_or_throw() -- Result unwrap
            :or_else_throw "Failed to find release with assets." -- Optional unwrap

        github
            .unzip_release_file({
                version = Optional.of(release.tag_name),
                asset_file = _.compose(_.format "salesforcedx-vscode-visualforce-%s.vsix", _.gsub("^v", "")),
                repo = repo,
            })
            .with_receipt()
    end,
}