Revision d605e261 src/Ganeti/Query/Server.hs

b/src/Ganeti/Query/Server.hs
369 369 
  socket_path <- Path.defaultQuerySocket
370 370 
  cleanupSocket socket_path
371 371 
  s <- describeError "binding to the Luxi socket"
372 
         Nothing (Just socket_path) $ getServer True socket_path
372 
         Nothing (Just socket_path) $ getLuxiServer True socket_path
373 373 
  cref <- newIORef (Bad "Configuration not yet loaded")
374 374 
  jq <- emptyJQStatus
375 375 
  return (socket_path, s, cref, jq)

Also available in: Unified diff