Inlined some proxies.
authorsabadev <saba@sabadev.xyz>
Tue, 23 Mar 2021 01:09:15 +0000 (21:09 -0400)
committersabadev <dev@sabadev.xyz>
Tue, 13 Apr 2021 01:16:35 +0000 (21:16 -0400)
src/ApiTypes.hs

index 7a3dd90..5eb93b7 100644 (file)
@@ -52,20 +52,11 @@ instance ToHttpApiData Theme where
 apiProxy :: Proxy Api
 apiProxy = Proxy
 
-blogProxy :: Proxy BlogPost
-blogProxy = Proxy
-
-darkThemeProxy :: Proxy DarkTheme
-darkThemeProxy = Proxy
-
-lightThemeProxy :: Proxy LightTheme
-lightThemeProxy = Proxy
-
 safeBlogLink :: MkLink BlogPost Link
-safeBlogLink = safeLink apiProxy blogProxy
+safeBlogLink = safeLink apiProxy (Proxy :: Proxy BlogPost)
 
 safeDarkThemeLink :: MkLink DarkTheme Link
-safeDarkThemeLink = safeLink apiProxy darkThemeProxy
+safeDarkThemeLink = safeLink apiProxy (Proxy :: Proxy DarkTheme)
 
 safeLightThemeLink :: MkLink LightTheme Link
-safeLightThemeLink = safeLink apiProxy lightThemeProxy
+safeLightThemeLink = safeLink apiProxy (Proxy :: Proxy LightTheme)