Revision 88772d17 src/Ganeti/Query/Server.hs
| b/src/Ganeti/Query/Server.hs | ||
|---|---|---|
| 387 | 387 |
$ sortJobIDs jids |
| 388 | 388 |
return . Ok $ showJSON result |
| 389 | 389 |
|
| 390 |
handleCall _ _ _ op =
|
|
| 391 |
return . Bad $
|
|
| 392 |
GenericError ("Luxi call '" ++ strOfOp op ++ "' not implemented")
|
|
| 390 |
handleCall _ _ _ (PickupJob _) =
|
|
| 391 |
return . Bad |
|
| 392 |
$ GenericError "Luxi call 'PickupJob' is for internal use only"
|
|
| 393 | 393 |
|
| 394 | 394 |
{-# ANN handleCall "HLint: ignore Too strict if" #-}
|
| 395 | 395 |
|
Also available in: Unified diff