diff --git a/src/Text/Layout/Table.hs b/src/Text/Layout/Table.hs
--- a/src/Text/Layout/Table.hs
+++ b/src/Text/Layout/Table.hs
@@ -236,8 +236,8 @@
 trimOrPad :: Position o -> CutMarkSpec -> Int -> String -> String
 trimOrPad p = case p of
     Start  -> fitRightWith
-    Center -> fitLeftWith
-    End    -> fitCenterWith
+    Center -> fitCenterWith
+    End    -> fitLeftWith
 
 -- | Align a column by first finding the position to pad with and then padding
 -- the missing lengths to the maximum value. If no such position is found, it
diff --git a/table-layout.cabal b/table-layout.cabal
--- a/table-layout.cabal
+++ b/table-layout.cabal
@@ -6,7 +6,7 @@
 -- PVP summary:      +-+------- breaking API changes
 --                   | | +----- non-breaking API additions
 --                   | | | +--- code changes with no API change
-version:             0.4.0.0
+version:             0.4.0.1
 
 synopsis:            Layout text as grid or table.