Revision 95d0d502 htools/Ganeti/Luxi.hs

b/htools/Ganeti/Luxi.hs
29 29 
  ( LuxiOp(..)
30 30 
  , QrViaLuxi(..)
31 31 
  , ResultStatus(..)
32 
  , LuxiReq(..)
32 33 
  , Client
33 34 
  , checkRS
34 35 
  , getClient
......
144 145 
    )
145 146 
  ])
146 147 

  		





  
  148
  
    
$(makeJSONInstance ''LuxiReq)


  		





  
  149
  
    

  		





  147
  150
  
    
-- | The serialisation of LuxiOps into strings in messages.


  		





  148
  151
  
    
$(genStrOfOp ''LuxiOp "strOfOp")


  		





  149
  152
  
    

  		












Also available in:
  Unified diff