Revision 0791b57f

b/src/Ganeti/Monitoring/Server.hs
184 184 
  writeBS . pack . J.encode $ report
185 185 

  		





  186
  186
  
    
-- | The function implementing the HTTP API of the monitoring agent.


  		





  187
  
  
    
-- TODO: Currently it only replies to the API version query: implement all the


  		





  188
  
  
    
-- missing features.


  		





  189
  187
  
    
monitoringApi :: Snap ()


  		





  190
  188
  
    
monitoringApi =


  		





  191
  189
  
    
  ifTop versionQ <|>


  		












Also available in:
  Unified diff