Revision 57ccc712 src/ganeti-metad.hs
b/src/ganeti-metad.hs | ||
---|---|---|
28 | 28 |
import qualified Ganeti.Constants as Constants |
29 | 29 |
import Ganeti.Daemon (OptType) |
30 | 30 |
import qualified Ganeti.Daemon as Daemon |
31 |
import qualified Ganeti.Metad as Metad
|
|
31 |
import qualified Ganeti.Metad.WebServer as WebServer
|
|
32 | 32 |
import qualified Ganeti.Runtime as Runtime |
33 | 33 |
|
34 | 34 |
options :: [OptType] |
... | ... | |
45 | 45 |
Daemon.genericMain Runtime.GanetiMetad options |
46 | 46 |
(\_ -> return . Right $ ()) |
47 | 47 |
(\_ _ -> return ()) |
48 |
(\opts _ _ -> Metad.start opts) |
|
48 |
(\opts _ _ -> WebServer.start opts) |
Also available in: Unified diff