Revision e09c1fa0 htest/Test/Ganeti/HTools/Loader.hs

b/htest/Test/Ganeti/HTools/Loader.hs
26 26

  
27 27
-}
28 28

  
29
module Test.Ganeti.HTools.Loader (testLoader) where
29
module Test.Ganeti.HTools.Loader (testHTools_Loader) where
30 30

  
31 31
import Test.QuickCheck
32 32

  
......
95 95
  BasicTypes.compareNameComponent (s1 ++ "." ++ s2) s1 ==
96 96
    BasicTypes.LookupResult BasicTypes.PartialMatch s1
97 97

  
98
testSuite "Loader"
98
testSuite "HTools/Loader"
99 99
            [ 'prop_lookupNode
100 100
            , 'prop_lookupInstance
101 101
            , 'prop_assignIndices

Also available in: Unified diff