summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/DiskImage/PartSpec.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor/Property/DiskImage/PartSpec.hs')
-rw-r--r--src/Propellor/Property/DiskImage/PartSpec.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/DiskImage/PartSpec.hs b/src/Propellor/Property/DiskImage/PartSpec.hs
index 0698d806..652b53c8 100644
--- a/src/Propellor/Property/DiskImage/PartSpec.hs
+++ b/src/Propellor/Property/DiskImage/PartSpec.hs
@@ -189,7 +189,7 @@ instance Sem.Semigroup PartLocation where
instance Monoid PartLocation where
mempty = Middle
- mappend = (<>)
+ mappend = (Sem.<>)
partLocation :: PartSpec PartLocation -> PartLocation -> PartSpec PartLocation
partLocation (mp, o, p, _) l = (mp, o, p, l)