Revision f18aaff4

b/src/Ganeti/Utils.hs
621 621
    logDebug $ "Notified of change in " ++ fpath
622 622
    fstat' <- getFStatSafe fpath
623 623
    writeIORef ref fstat'
624
  result <- watchFileEx endtime fstat ref old read_fn
625
  killINotify inotify
626
  return result
624
  newval <- read_fn
625
  if newval /= old
626
    then do
627
      logDebug $ "File " ++ fpath ++ " changed during setup of inotify"
628
      killINotify inotify
629
      return newval
630
    else do
631
      result <- watchFileEx endtime fstat ref old read_fn
632
      killINotify inotify
633
      return result
627 634
  

Also available in: Unified diff