diff --git a/Ganeti/HTools/Cluster.hs b/Ganeti/HTools/Cluster.hs
index a6fffe9a76a2dae0c70368f7600a38c51059af21..dfeb7ccfff597a875aba6bc255e3cc2fda9db92d 100644
--- a/Ganeti/HTools/Cluster.hs
+++ b/Ganeti/HTools/Cluster.hs
@@ -79,7 +79,7 @@ type Score = Double
 -- | The description of an instance placement.
 type Placement = (Idx, Ndx, Ndx, Score)
 
--- | Allocation/relocation solution.
+-- | Allocation\/relocation solution.
 type AllocSolution = [(Maybe Node.List, Instance.Instance, [Node.Node])]
 
 -- | A cluster solution described as the solution delta and the list