summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Parted.hs
diff options
context:
space:
mode:
authorJoey Hess2015-08-25 20:54:38 -0700
committerJoey Hess2015-08-25 20:54:38 -0700
commit5b9303f50a9283aaeb85b7665392822e53f73423 (patch)
tree699ccdd9f37645d0a22d113a910638bdaa66c4cb /src/Propellor/Property/Parted.hs
parent9688b0296166ebf7b75ba6519b588a5001b476d8 (diff)
propellor spin
Diffstat (limited to 'src/Propellor/Property/Parted.hs')
-rw-r--r--src/Propellor/Property/Parted.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Parted.hs b/src/Propellor/Property/Parted.hs
index 09753cd1..8c71de5b 100644
--- a/src/Propellor/Property/Parted.hs
+++ b/src/Propellor/Property/Parted.hs
@@ -142,7 +142,7 @@ partitioned eep disk (PartTable tabletype parts) = property desc $ do
-- it makes parted automatically adjust the first partition
-- start to be beyond the start of the partition table.
, if offset == 0 then "0" else show offset ++ "B"
- , show (offset + partSize p)
+ , show (offset + partSize p) ++ "B"
] ++ case partName p of
Just n -> ["name", show partnum, n]
Nothing -> []