; Fix recently added documentation

* lisp/thingatpt.el (bounds-of-thing-at-mouse, thing-at-mouse):
Improve and clarify the doc strings.

diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 6670857df18765cd235cce46bc4e3b68b0658252..58ef2cfd91725ed42910f3b3b22018961ee98a6c 100644 (file)
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -189,8 +189,8 @@ a symbol as a valid THING."
 
 ;;;###autoload
 (defun bounds-of-thing-at-mouse (event thing)
-  "Determine the start and end locations for the THING at mouse click.
-Like `bounds-of-thing-at-point', but tries to use the EVENT
+  "Determine start and end locations for THING at mouse click given by EVENT.
+Like `bounds-of-thing-at-point', but tries to use the position in EVENT
 where the mouse button is clicked to find the thing nearby."
   (save-excursion
     (mouse-set-point event)
@@ -198,8 +198,8 @@ where the mouse button is clicked to find the thing nearby."
 
 ;;;###autoload
 (defun thing-at-mouse (event thing &optional no-properties)
-  "Return the THING at mouse click.
-Like `thing-at-point', but tries to use the EVENT
+  "Return the THING at mouse click specified by EVENT.
+Like `thing-at-point', but tries to use the position in EVENT
 where the mouse button is clicked to find the thing nearby."
   (save-excursion
     (mouse-set-point event)