; Fix documentation of recent change in mouse.el

* lisp/mouse.el (mouse-event-areas-with-no-buffer-positions): Doc
fix.
(mouse-posn-property): Add commentary.

(cherry picked from commit 82e44e86754427864305fcc2e03a52a54a1cae2f)

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 2fcbe856b89a0556610ab7745e51ae5017750caa..4307fd86cb9dbfe0fed7fe51de975ea1a0f10e22 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1647,7 +1647,7 @@ is dragged over to."
   "Event areas not containing buffer positions.
 Example: mouse clicks in the fringe come with a position in
 (nth 5).  This is useful but is not where we clicked, so
-don't look up that position's properties!.  Likewise for
+don't look up that position's properties!  Likewise for
 the other event areas.")
 
 (defun mouse-posn-property (pos property)
@@ -1673,6 +1673,9 @@ because such events do not contain buffer positions."
                 (get-text-property (cdr str) property (car str)))
             (and pt
                  (not (memq (posn-area pos)
+                            ;; Don't return position of these mouse
+                            ;; events because they don't describe the
+                            ;; position of the click.
                             mouse-event-areas-with-no-buffer-positions))
                  (get-char-property pt property w))))
     (get-char-property pos property)))