Revision 9d0b521e src/Ganeti/Query/Server.hs

b/src/Ganeti/Query/Server.hs
150 150
               TagGroup    name -> groupTags <$> Config.getGroup    cfg name
151 151
               TagNode     name -> nodeTags  <$> Config.getNode     cfg name
152 152
               TagInstance name -> instTags  <$> Config.getInstance cfg name
153
               TagNetwork  name -> networkTags  <$> Config.getNetwork cfg name
153 154
  in return (J.showJSON <$> tags)
154 155

  
155 156
handleCall cfg (Query qkind qfields qfilter) = do

Also available in: Unified diff