remove content length limit

src/Cli/Cli.hs

@@ -432,9 +432,9 @@ parsePkgCat = subparser $ command "categorize" (info cat $ progDesc "Add or remo
 parseEosPublish :: Parser EosUpload
 parseEosPublish =
     subparser $
-        command "upload" (info go $ progDesc "Publishes a .s9pk to a remote registry")
+        command "eos-upload" (info go $ progDesc "Publishes a .img to a remote registry")
             <> metavar
-                "upload"
+                "eos-upload"
     where
         go =
             liftA3

src/Foundation.hs

@@ -150,6 +150,7 @@ import Yesod.Persist.Core (
     YesodPersistRunner (..),
     defaultGetDBRunner,
  )
+import Foundation (Route(EosUploadR))
 
 
 -- | The foundation datatype for your application. This can be a good place to
@@ -287,6 +288,7 @@ instance Yesod RegistryCtx where
 
     maximumContentLengthIO :: RegistryCtx -> Maybe (Route RegistryCtx) -> IO (Maybe Word64)
     maximumContentLengthIO _ (Just PkgUploadR) = pure Nothing
+    maximumContentLengthIO _ (Just EosUploadR) = pure Nothing
     maximumContentLengthIO _ _ = pure $ Just 2097152 -- the original default