Revision 830b09dd

b/src/Ganeti/Constants.hs
4303 4303
opcodeReasonSrcClient :: String
4304 4304
opcodeReasonSrcClient = "gnt:client"
4305 4305

  
4306
_opcodeReasonSrcDaemon :: String
4307
_opcodeReasonSrcDaemon = "gnt:daemon"
4308

  
4309
_opcodeReasonSrcMasterd :: String
4310
_opcodeReasonSrcMasterd = _opcodeReasonSrcDaemon ++ ":masterd"
4311

  
4306 4312
opcodeReasonSrcNoded :: String
4307
opcodeReasonSrcNoded = "gnt:daemon:noded"
4313
opcodeReasonSrcNoded = _opcodeReasonSrcDaemon ++ ":noded"
4308 4314

  
4309 4315
opcodeReasonSrcOpcode :: String
4310 4316
opcodeReasonSrcOpcode = "gnt:opcode"
4311 4317

  
4318
opcodeReasonSrcPickup :: String
4319
opcodeReasonSrcPickup = _opcodeReasonSrcMasterd ++ ":pickup"
4320

  
4312 4321
opcodeReasonSrcRlib2 :: String
4313 4322
opcodeReasonSrcRlib2 = "gnt:library:rlib2"
4314 4323

  
......
4320 4329
  ConstantUtils.mkSet [opcodeReasonSrcClient,
4321 4330
                       opcodeReasonSrcNoded,
4322 4331
                       opcodeReasonSrcOpcode,
4332
                       opcodeReasonSrcPickup,
4323 4333
                       opcodeReasonSrcRlib2,
4324 4334
                       opcodeReasonSrcUser]
4325 4335

  

Also available in: Unified diff