Start9/registry
2
0
Fork 0
mirror of https://github.com/Start9Labs/registry.git synced 2026-03-26 02:11:53 +00:00
Code Issues Packages Projects Releases Wiki Activity

hotfix for getting os version from query param

Browse Source
This commit is contained in:
Lucy Cifferello
2023-11-15 17:07:33 -05:00
parent 0d5db1fa7a
commit d4483f8ca3
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/Handler/Util.hs
View File

@@ -165,10 +165,10 @@ tickleMAU = do
lookupGetParam "server-id" >>= \case lookupGetParam "server-id" >>= \case
Nothing -> pure () Nothing -> pure ()
Just sid -> do Just sid -> do
currentEosVersion <- queryParamAs "eos-version" parseVersion currentOsVersion <- getOsVersion
arch <- getOsArch arch <- getOsArch
now <- liftIO getCurrentTime now <- liftIO getCurrentTime
void $ liftHandler $ runDB $ insertRecord $ UserActivity now sid currentEosVersion arch void $ liftHandler $ runDB $ insertRecord $ UserActivity now sid currentOsVersion arch
fetchCompatiblePkgVersions :: Maybe VersionRange -> PkgId -> Handler [VersionRecord] fetchCompatiblePkgVersions :: Maybe VersionRange -> PkgId -> Handler [VersionRecord]