OSS/slackbuilder
1
0
Fork 0
Code Issues 1 Pull Requests Actions Releases Activity

Make version picker a command
All checks were successful
Build / audit (push) Successful in 8s
Details
Build / test (push) Successful in 15m28s
Details

Browse Source
This commit is contained in:
Eugen Wissner
2024-09-27 12:20:34 +02:00
parent f758ea7904
commit ebbdb6f0f7
3 changed files with 28 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/Main.hs
View File

@ -17,7 +17,6 @@ import SlackBuilder.LatestVersionCheck
import SlackBuilder.Update
import qualified Toml
import Data.Text (Text)
import qualified Data.Text as Text
import qualified Data.Text.IO as Text
import Control.Monad.Trans.Reader (ReaderT(..), asks)
import SlackBuilder.Package (PackageDescription(..))
@ -117,10 +116,7 @@ autoUpdatable packageSettings =
}
, PackageDescription
{ latest =
let textArguments = TextArguments
{ textURL = fromJust $ getField @"text" setting
, versionPicker = Right ["grep", "-oh", "Linux—[[:digit:].]\\+"]
}
let textArguments = uncurry TextArguments $ fromJust $ getField @"text" setting
setting = fromJust $ find ((== "webex") . getField @"name") packageSettings
template = Package.DownloadTemplate $ getField @"template" setting
in Package.Updater
@ -146,10 +142,7 @@ autoUpdatable packageSettings =
}
, PackageDescription
{ latest =
let textArguments = TextArguments
{ textURL = fromJust $ getField @"text" setting
, versionPicker = Left Text.strip
}
let textArguments = uncurry TextArguments $ fromJust $ getField @"text" setting
setting = fromJust $ find ((== "dmd") . getField @"name") packageSettings
template = Package.DownloadTemplate $ getField @"template" setting
in Package.Updater
@ -162,10 +155,7 @@ autoUpdatable packageSettings =
}
, PackageDescription
{ latest =
let textArguments = TextArguments
{ textURL = fromJust $ getField @"text" setting
, versionPicker = Left Text.strip
}
let textArguments = uncurry TextArguments $ fromJust $ getField @"text" setting
setting = fromJust $ find ((== "d-tools") . getField @"name") packageSettings
template = Package.DownloadTemplate $ getField @"template" setting
in Package.Updater