summaryrefslogtreecommitdiff
path: root/app/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs21
1 files changed, 21 insertions, 0 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 99be344..27ae118 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -2,6 +2,8 @@ module Main
( main
) where
+import Data.Char (isNumber)
+import Control.Applicative (Applicative(liftA2))
import Data.List.NonEmpty (NonEmpty(..))
import qualified Data.List.NonEmpty as NonEmpty
import Control.Monad.IO.Class (MonadIO(..))
@@ -147,6 +149,25 @@ autoUpdatable =
, name = "rdiff-backup"
, reupload = Just mempty
}
+ , Package
+ { latest =
+ let needle = "Linux—"
+ textArguments = TextArguments
+ { textURL = "https://help.webex.com/en-us/article/mqkve8/Webex-App-%7C-Release-notes"
+ , versionPicker = Text.takeWhile (liftA2 (||) (== '.') isNumber)
+ . Text.drop (Text.length needle)
+ . snd
+ . Text.breakOn needle
+ }
+ latest' = latestText textArguments
+ template = Package.DownloadTemplate $ pure
+ $ Package.StaticPlaceholder
+ "https://binaries.webex.com/WebexDesktop-Ubuntu-Official-Package/Webex.deb"
+ in Package.Updater latest' template
+ , category = "network"
+ , name = "webex"
+ , reupload = Nothing
+ }
]
up2Date :: SlackBuilderT ()