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