Fix path for serial file
[ganeti-github.git] / src / Ganeti / Path.hs
index 9383c18..0a7daf3 100644 (file)
@@ -106,7 +106,7 @@ queueDir = dataDirP "queue"
 
 -- | Job queue serial file.
 jobQueueSerialFile :: IO FilePath
-jobQueueSerialFile = dataDirP "serial"
+jobQueueSerialFile = queueDir `pjoin` "serial"
 
 -- | Job queue archive directory.
 jobQueueArchiveSubDir :: FilePath