Revision dce08ad3

b/src/Ganeti/Query/Query.hs
313 313 
queryFields (QueryFields (ItemTypeOpCode QRGroup) fields) =
314 314 
  Ok $ fieldsExtractor Group.fieldsMap fields
315 315 

  		





  
  316
  
    
queryFields (QueryFields (ItemTypeOpCode QRNetwork) fields) =


  		





  
  317
  
    
  Ok $ fieldsExtractor Network.fieldsMap fields


  		





  
  318
  
    

  		





  316
  319
  
    
queryFields (QueryFields (ItemTypeLuxi QRJob) fields) =


  		





  317
  320
  
    
  Ok $ fieldsExtractor Query.Job.fieldsMap fields


  		





  318
  321
  
    

  		












Also available in:
  Unified diff