Revision cc532bdd htools/Ganeti/HTools/IAlloc.hs

b/htools/Ganeti/HTools/IAlloc.hs
181 181 
                rl_names <- extrReq "instances"
182 182 
                rl_insts <- mapM (Container.findByName map_i) rl_names
183 183 
                let rl_idx = map Instance.idx rl_insts
184 
                rl_mode <- do
184 
                rl_mode <-
185 185 
                   case extrReq "reloc_mode" of
186 186 
                     Ok s | s == C.iallocatorMrelocKeep -> return KeepGroup
187 187 
                          | s == C.iallocatorMrelocChange ->

Also available in: Unified diff