LGTM, thanks
On Tue, Feb 18, 2014 at 3:39 PM, Hrvoje Ribicic <[email protected]> wrote: > Following the example of the job-queue test, the delay also defines a > log message type of its own. > > Signed-off-by: Hrvoje Ribicic <[email protected]> > --- > src/Ganeti/Constants.hs | 3 +++ > src/Ganeti/Types.hs | 1 + > 2 files changed, 4 insertions(+) > > diff --git a/src/Ganeti/Constants.hs b/src/Ganeti/Constants.hs > index d44e1fd..a37452d 100644 > --- a/src/Ganeti/Constants.hs > +++ b/src/Ganeti/Constants.hs > @@ -3373,6 +3373,9 @@ elogRemoteImport = Types.eLogTypeToRaw > ELogRemoteImport > elogJqueueTest :: String > elogJqueueTest = Types.eLogTypeToRaw ELogJqueueTest > > +elogDelayTest :: String > +elogDelayTest = Types.eLogTypeToRaw ELogDelayTest > + > -- * /etc/hosts modification > > etcHostsAdd :: String > diff --git a/src/Ganeti/Types.hs b/src/Ganeti/Types.hs > index bc7f0c2..c2e30dc 100644 > --- a/src/Ganeti/Types.hs > +++ b/src/Ganeti/Types.hs > @@ -744,6 +744,7 @@ $(THH.declareLADT ''String "ELogType" > [ ("ELogMessage", "message") > , ("ELogRemoteImport", "remote-import") > , ("ELogJqueueTest", "jqueue-test") > + , ("ELogDelayTest", "delay-test") > ]) > $(THH.makeJSONInstance ''ELogType) > > -- > 1.9.0.rc1.175.g0b1dcb5 > >
