diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 91cc6e22152..56471c1eae3 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -77,10 +77,10 @@
                (const box) integer)
          (const :tag "Hollow cursor" hollow)
          (const :tag "Vertical bar" bar)
-         (cons  :tag "Vertical bar with specified height"
+         (cons  :tag "Vertical bar with specified width"
                 (const bar) integer)
          (const :tag "Horizontal bar" hbar)
-         (cons  :tag "Horizontal bar with specified width"
+         (cons  :tag "Horizontal bar with specified height"
                 (const hbar) integer)
          (const :tag "None "nil))))
   (pcase-dolist