Revision a64cc96b src/Ganeti/Query/Node.hs

b/src/Ganeti/Query/Node.hs
158 158 
     QffNormal)
159 159 
  , (FieldDefinition "group" "Group" QFTText "Node group",
160 160 
     FieldConfig (\cfg node ->
161 
                    rsMaybe (groupName <$> getGroupOfNode cfg node)),
161 
                    rsMaybeNoData (groupName <$> getGroupOfNode cfg node)),
162 162 
     QffNormal)
163 163 
  , (FieldDefinition "group.uuid" "GroupUUID" QFTText "UUID of node group",
164 164 
     FieldSimple (rsNormal . nodeGroup), QffNormal)
165 165 
  ,  (FieldDefinition "ndparams" "NodeParameters" QFTOther
166 166 
        "Merged node parameters",
167 
      FieldConfig ((rsMaybe .) . getNodeNdParams), QffNormal)
167 
      FieldConfig ((rsMaybeNoData .) . getNodeNdParams), QffNormal)
168 168 
  , (FieldDefinition "custom_ndparams" "CustomNodeParameters" QFTOther
169 169 
                       "Custom node parameters",
170 170 
     FieldSimple (rsNormal . nodeNdparams), QffNormal)

Also available in: Unified diff