diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 99b99c4ef1b..8aa6dde86cd 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -189,6 +189,7 @@ This returns ARGS with the arguments that have been processed removed."
 ;; Handle Xresources.
 
 (defun x-read-resources ()
+  "Return an alist of values 
   "Reread the X defaults from the X server and install them in
 `screen-default-alist', to be used in new screens."
   (interactive)