; * lisp/play/fortune.el (fortune-ask-file): Doc fix.

diff --git a/lisp/play/fortune.el b/lisp/play/fortune.el
index d6360e502278eebaa612e80f57f8b4643992df2c..0973f2bc5f2f95fb809081e94481b1b858502fe9 100644 (file)
--- a/lisp/play/fortune.el
+++ b/lisp/play/fortune.el
@@ -176,7 +176,7 @@ If INTERACTIVE is non-nil, don't compile the fortune file afterwards."
          (fortune-compile file)))))
 
 (defun fortune-ask-file ()
-  "Asks the user for a file name."
+  "Ask the user for the file name of the fortune file."
   (expand-file-name
    (read-file-name
     "Fortune file to use: "