@@ -418,7 +418,7 @@ paraStyle parent attrs = do
418418 let styleAttr = [ ("style:name" , "P" ++ show pn)
419419 , ("style:family" , "paragraph" )
420420 , ("style:parent-style-name", parent )]
421− indentVal = if b then "0.5in" else show i ++ "in"
421+ indentVal = flip (++) "in" . show $ if b then (max 0.5 i) else i
422422 indent = if i == 0 && not b
423423 then empty
424424 else selfClosingTag "style:paragraph-properties"