Revision 39c1e700 src/Ganeti/WConfd/Server.hs

b/src/Ganeti/WConfd/Server.hs
40 40 
import Ganeti.BasicTypes
41 41 
import Ganeti.Daemon
42 42 
import Ganeti.Logging (logInfo, logDebug)
43 
import Ganeti.Locking.Allocation
44 43 
import Ganeti.Locking.Locks
44 
import Ganeti.Locking.Waiting
45 45 
import qualified Ganeti.Path as Path
46 46 
import Ganeti.THH.RPC
47 47 
import Ganeti.UDSServer
......
84 84 
    (cdata, cstat) <- loadConfigFromFile conf_file
85 85 
    lock <- if lock_file_present
86 86 
              then loadLockAllocation lock_file
87 
              else return emptyAllocation
87 
              else return emptyWaiting
88 88 
    mkDaemonHandle conf_file
89 89 
                   (mkConfigState cdata)
90 90 
                   lock

Also available in: Unified diff