On Fri, Jul 04, 2014 at 02:42:06PM +0200, Petr Pudlák wrote:
> Interdiff:
> 
> diff --git a/src/Ganeti/WConfd/DeathDetection.hs
> b/src/Ganeti/WConfd/DeathDetection.hs
> index 3b0e69c..26264a0 100644
> --- a/src/Ganeti/WConfd/DeathDetection.hs
> +++ b/src/Ganeti/WConfd/DeathDetection.hs
> @@ -63,8 +63,8 @@ cleanupLocksTask = forever . runResultT $ do
>          died <- liftIO (isDead fpath)
>          when died $ do
>            logInfo $ show owner ++ " died, releasing locks and reservations"
> -          persCleanup persistentLocks owner
>            persCleanup persistentTempRes owner
> +          persCleanup persistentLocks owner
>            _ <- liftIO . E.try $ removeFile fpath
>                 :: WConfdMonad (Either IOError ())
>            return ()

LGTM

-- 
Klaus Aehlig
Google Germany GmbH, Dienerstr. 12, 80331 Muenchen
Registergericht und -nummer: Hamburg, HRB 86891
Sitz der Gesellschaft: Hamburg
Geschaeftsfuehrer: Graham Law, Christine Elizabeth Flores

Reply via email to