mirror of
https://github.com/Start9Labs/registry.git
synced 2026-03-26 10:21:51 +00:00
remove function that is invalid for 0.3 appmgr
This commit is contained in:
13
src/Lib/External/AppMgr.hs
vendored
13
src/Lib/External/AppMgr.hs
vendored
@@ -57,19 +57,6 @@ readProcessInheritStderr a b c sink = do
|
||||
$ System.Process.Typed.proc a b
|
||||
withProcessTerm_ pc $ \p -> sink (getStdout p)
|
||||
|
||||
sourceConfig :: (MonadUnliftIO m, MonadThrow m)
|
||||
=> FilePath
|
||||
-> FilePath
|
||||
-> S9PK
|
||||
-> (ConduitT () ByteString m () -> m r)
|
||||
-> m r
|
||||
sourceConfig appmgrPath appPath e@(Extension appId) sink = do
|
||||
let
|
||||
appmgr = readProcessInheritStderr (appmgrPath <> "embassy-sdk")
|
||||
["inspect", "config", appPath </> show e, "--json"]
|
||||
""
|
||||
appmgr sink `catch` \ece -> throwIO (AppMgrE [i|inspect config #{appId} \--json|] (eceExitCode ece))
|
||||
|
||||
sourceManifest :: (MonadUnliftIO m) => FilePath -> FilePath -> S9PK -> (ConduitT () ByteString m () -> m r) -> m r
|
||||
sourceManifest appmgrPath appPath e@(Extension appId) sink = do
|
||||
let appmgr = readProcessInheritStderr (appmgrPath <> "embassy-sdk") ["inspect", "manifest", appPath </> show e] ""
|
||||
|
||||
Reference in New Issue
Block a user