diff --git a/cpdfcommand.ml b/cpdfcommand.ml
index daf5a2c..27800a9 100644
--- a/cpdfcommand.ml
+++ b/cpdfcommand.ml
@@ -3109,7 +3109,7 @@ let addrectangle
     let x, y =
       match position with
         Cpdf.Top _ | Cpdf.TopLeft _ | Cpdf.TopRight _ -> (x, y -. h)
-      | Cpdf.Centre -> (x, y -. (h /. 2.))
+      | Cpdf.Centre | Cpdf.PosCentre _ -> (x, y -. (h /. 2.))
       | _ -> (x, y)
     in
     let ops =