From 5452799d8a1496c21c0574995f603587e0bf31c4 Mon Sep 17 00:00:00 2001
From: Keagan McClelland <keagan.mcclelland@gmail.com>
Date: Mon, 26 Oct 2020 15:17:07 -0600
Subject: [PATCH] fixes useragent parsing for 'MeshOS' which should enable
 filtering back to 0.1.3

---
 src/Handler/Apps.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Handler/Apps.hs b/src/Handler/Apps.hs
index a483a0c..97df697 100644
--- a/src/Handler/Apps.hs
+++ b/src/Handler/Apps.hs
@@ -57,7 +57,7 @@ instance Show FileExtension where
 
 userAgentOsVersionParser :: Atto.Parser AppVersion
 userAgentOsVersionParser = do
-    void $ (Atto.string "AmbassadorOS" <|> Atto.string "EmbassyOS") *> Atto.char '/'
+    void $ (Atto.string "EmbassyOS" <|> Atto.string "AmbassadorOS" <|> Atto.string "MeshOS") *> Atto.char '/'
     semverParserBS
 
 getEmbassyOsVersion :: Handler (Maybe AppVersion)