--select-instances hbal manpage update

[ganeti-local] / htools / hspace.hs

diff --git a/htools/hspace.hs b/htools/hspace.hs
index 57d0302..d45fbd1 100644 (file)
--- a/htools/hspace.hs
+++ b/htools/hspace.hs
@@ -280,7 +280,7 @@ main = do
 
   -- utility functions
   let iofspec spx = Instance.create "new" (rspecMem spx) (rspecDsk spx)
-                    (rspecCpu spx) "running" [] (-1) (-1)
+                    (rspecCpu spx) "running" [] True (-1) (-1)
       exitifbad val = (case val of
                          Bad s -> do
                            hPrintf stderr "Failure: %s\n" s :: IO ()