Revision 3695a4e0 src/Ganeti/Query/Server.hs
| b/src/Ganeti/Query/Server.hs | ||
|---|---|---|
| 239 | 239 |
-- | Type alias for prepMain results |
| 240 | 240 |
type PrepResult = (FilePath, S.Socket, IORef (Result ConfigData)) |
| 241 | 241 |
|
| 242 |
-- | Check function for queryd.
|
|
| 242 |
-- | Check function for luxid.
|
|
| 243 | 243 |
checkMain :: CheckFn () |
| 244 | 244 |
checkMain _ = return $ Right () |
| 245 | 245 |
|
| 246 |
-- | Prepare function for queryd.
|
|
| 246 |
-- | Prepare function for luxid.
|
|
| 247 | 247 |
prepMain :: PrepFn () PrepResult |
| 248 | 248 |
prepMain _ _ = do |
| 249 | 249 |
socket_path <- Path.defaultQuerySocket |
Also available in: Unified diff