Revision ce03c84c

b/src/Ganeti/Monitoring/Server.hs
119 119
prepMain opts _ = do
120 120
  accessLog <- daemonsExtraLogFile GanetiMond AccessLog
121 121
  errorLog <- daemonsExtraLogFile GanetiMond ErrorLog
122
  return $
122
  return .
123 123
    setPort
124
      (maybe C.defaultMondPort fromIntegral (optPort opts))
125
      (defaultHttpConf accessLog errorLog)
124
      (maybe C.defaultMondPort fromIntegral (optPort opts)) .
125
    maybe id (setBind . pack) (optBindAddress opts)
126
    $ defaultHttpConf accessLog errorLog
126 127

  
127 128
-- * Query answers
128 129

  
b/src/ganeti-mond.hs
36 36
  [ oNoDaemonize
37 37
  , oNoUserChecks
38 38
  , oDebug
39
  , oBindAddress
39 40
  , oPort C.defaultMondPort
40 41
  ]
41 42

  

Also available in: Unified diff