diff --git a/README.md b/README.md
index 4aa04a0..5945815 100644
--- a/README.md
+++ b/README.md
@@ -40,12 +40,13 @@ navigating through errors:
 
 ### Type Enclosings
 
-`ocaml-eglot` displays the type of expression below the cursor and
-increases or decreases the enclosings of the expression or verbosity:
+In `ocaml-eglot` one can display the type of the expression below the cursor and
+navigate the enclosing nodes while increasing or decreasing verbosity:
 
 - `ocaml-eglot-type-enclosing` (<kbd>C-c</kbd> <kbd>C-t</kbd>)
+Display the type of the selection and start a "type enclosing" session.
 
-And when a type is displayed, additional commands are possible:
+During a "type enclosing" session the following commands are available:
 
 - `ocaml-eglot-type-enclosing-increase-verbosity` (<kbd>C-c</kbd>
   <kbd>C-t</kbd> or <kbd>C-→</kbd>): to increase the verbosity of the
diff --git a/ocaml-eglot-type-enclosing.el b/ocaml-eglot-type-enclosing.el
index be06fb2..40e7e16 100644
--- a/ocaml-eglot-type-enclosing.el
+++ b/ocaml-eglot-type-enclosing.el
@@ -105,7 +105,7 @@
     (ocaml-eglot-type-enclosing--with-fixed-offset)))
 
 (defun ocaml-eglot-type-enclosing-shrink ()
-  "Shrinking of the type enclosing."
+  "Display the type enclosing of a smaller enclosing if possible."
   (interactive)
   (when ocaml-eglot-type-enclosing-types
     (if (<= ocaml-eglot-type-enclosing-offset 0)