diff --git a/exwm-floating.el b/exwm-floating.el
index ebf39c4..c4e29de 100644
--- a/exwm-floating.el
+++ b/exwm-floating.el
@@ -35,13 +35,13 @@
   :group 'exwm)
 
 (defcustom exwm-floating-setup-hook nil
-  "Normal hook run when an X window has been made floating, in the
-context of the corresponding buffer."
+  "Normal hook run when an X window has been made floating.
+This hook runs in the context of the corresponding buffer."
   :type 'hook)
 
 (defcustom exwm-floating-exit-hook nil
-  "Normal hook run when an X window has exited floating state, in the
-context of the corresponding buffer."
+  "Normal hook run when an X window has exited floating state.
+This hook runs in the context of the corresponding buffer."
   :type 'hook)
 
 (defcustom exwm-floating-border-color "navy"
diff --git a/exwm-input.el b/exwm-input.el
index 147638b..bb97adc 100644
--- a/exwm-input.el
+++ b/exwm-input.el
@@ -107,8 +107,7 @@ defined in `exwm-mode-map' here."
                                               read-key-sequence-vector
                                               read-key-sequence
                                               read-event)
-  "Low-level functions that read events and need to be exempted from
-EXWM's input handling.")
+  "Low-level read functions that must be exempted from EXWM input handling.")
 
 (defvar exwm-input--during-command nil
   "Indicate whether between `pre-command-hook' and `post-command-hook'.")
diff --git a/exwm.el b/exwm.el
index 1929b7a..a9deb5c 100644
--- a/exwm.el
+++ b/exwm.el
@@ -115,8 +115,8 @@
   "Name of the subordinate Emacs server.")
 
 (defvar exwm--server-timeout 1
-  "Number of seconds to wait for the subordinate Emacs server to exit before
-killing it.")
+  "Number of seconds to wait for the subordinate Emacs server to exit.
+After this time, the server will be killed.")
 
 (defvar exwm--server-process nil "Process of the subordinate Emacs server.")