unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
From: martin rudalics <rudalics@gmx.at>
To: Eli Zaretskii <eliz@gnu.org>
Cc: 50256@debbugs.gnu.org, larsi@gnus.org, juri@linkov.net
Subject: bug#50256: thing-at-mouse
Date: Sat, 4 Sep 2021 13:10:43 +0200	[thread overview]
Message-ID: <087851c3-b3b1-5130-f4b1-50cd42ef83a8@gmx.at> (raw)
In-Reply-To: <83sfykwyyb.fsf@gnu.org>

[-- Attachment #1: Type: text/plain, Size: 562 bytes --]

 > That's orthogonal.  (And it seems to issue the warning in an unrelated
 > case, handled by the 'else' clause?)

Which case?

 > We should first decide how to
 > support the context menus with this stuff, and then we can talk how to
 > find code out there which makes similar assumptions.  (But if there is
 > such code out there, how was it working till now?)

Maybe I have not been making myself clear.  What I would apply is the
attached (modulo any errors it contains): No change in behavior, just a
warning in the doc-string and suspicious calls.

martin

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: pos-visible-in-window-p.diff --]
[-- Type: text/x-patch; name="pos-visible-in-window-p.diff", Size: 1445 bytes --]

diff --git a/src/window.c b/src/window.c
index cb8fe5fcdb..a7ad4d5599 100644
--- a/src/window.c
+++ b/src/window.c
@@ -2172,6 +2172,10 @@ DEFUN ("pos-visible-in-window-p", Fpos_visible_in_window_p,
 first.  POS defaults to point in WINDOW; WINDOW defaults to the
 selected window.

+Do not pass nil as POS unless you are sure that WINDOW displays the
+current buffer.  This function will emit a warning when POS is neither a
+marker, a number or t and WINDOW does not display the current buffer.
+
 If POS is visible, return t if PARTIALLY is nil; if PARTIALLY is non-nil,
 the return value is a list of 2 or 6 elements (X Y [RTOP RBOT ROWH VPOS]),
 where X and Y are the pixel coordinates relative to the top left corner
@@ -2199,10 +2203,16 @@ DEFUN ("pos-visible-in-window-p", Fpos_visible_in_window_p,
     posint = -1;
   else if (!NILP (pos))
     posint = fix_position (pos);
-  else if (w == XWINDOW (selected_window))
-    posint = PT;
   else
-    posint = marker_position (w->pointm);
+    {
+      if (XBUFFER (w->contents) != current_buffer)
+	message ("`pos-visible-in-window' called with POS nil but WINDOW's buffer is not current");
+
+      if (w == XWINDOW (selected_window))
+	posint = PT;
+      else
+	posint = marker_position (w->pointm);
+    }

   /* If position is above window start or outside buffer boundaries,
      or if window start is out of range, position is not visible.  */

  reply	other threads:[~2021-09-04 11:10 UTC|newest]

Thread overview: 64+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2021-08-29 17:21 bug#50256: thing-at-mouse Juri Linkov
2021-08-29 20:03 ` Lars Ingebrigtsen
2021-08-30  7:20   ` Juri Linkov
2021-08-31  0:04     ` Lars Ingebrigtsen
2021-08-31  6:49       ` Juri Linkov
2021-08-31 17:52         ` Juri Linkov
2021-09-01  7:17           ` Juri Linkov
2021-09-01  7:43             ` Lars Ingebrigtsen
2021-09-01  9:18             ` martin rudalics
2021-09-01 12:16               ` Eli Zaretskii
2021-09-01 14:25                 ` martin rudalics
2021-09-01 15:59                   ` Eli Zaretskii
2021-09-01 16:21                     ` martin rudalics
2021-09-01 17:54                       ` Eli Zaretskii
2021-09-01 17:59                         ` Juri Linkov
2021-09-01 19:23                           ` Eli Zaretskii
2021-09-02  6:16                             ` Juri Linkov
2021-09-02  7:21                               ` Eli Zaretskii
2021-09-02  7:23                               ` Lars Ingebrigtsen
2021-09-02  7:34                                 ` Eli Zaretskii
2021-09-02  6:48                         ` martin rudalics
2021-09-02  7:30                           ` Eli Zaretskii
2021-09-02  7:32                             ` Lars Ingebrigtsen
2021-09-02  7:46                               ` Eli Zaretskii
2021-09-02  8:54                                 ` martin rudalics
2021-09-02  9:02                                   ` Eli Zaretskii
2021-09-02 12:42                                     ` martin rudalics
2021-09-02 13:13                                       ` Eli Zaretskii
2021-09-02 14:43                                         ` martin rudalics
2021-09-02 15:58                                           ` Juri Linkov
2021-09-02 18:28                                             ` Juri Linkov
2021-09-02 18:41                                               ` Eli Zaretskii
2021-09-03  7:40                                                 ` martin rudalics
2021-09-03 11:06                                                   ` Eli Zaretskii
2021-09-04  7:34                                                     ` martin rudalics
2021-09-04  8:02                                                       ` Eli Zaretskii
2021-09-04 11:10                                                         ` martin rudalics [this message]
2021-09-04 11:35                                                           ` Eli Zaretskii
2021-09-04 18:58                                                             ` Juri Linkov
2021-09-05  7:50                                                               ` martin rudalics
2021-09-05  7:50                                                             ` martin rudalics
2021-09-05  9:24                                                               ` Eli Zaretskii
2021-09-05  9:39                                                                 ` martin rudalics
2021-09-05  9:42                                                                   ` Eli Zaretskii
2021-09-06  8:31                                                                     ` martin rudalics
2021-09-05 16:13                                                               ` Juri Linkov
2021-09-05 16:47                                                                 ` Eli Zaretskii
2021-09-06  8:31                                                                   ` martin rudalics
2021-09-06 10:57                                                                     ` Eli Zaretskii
2021-09-06 14:08                                                                       ` martin rudalics
2021-09-06 15:43                                                                         ` Eli Zaretskii
2021-09-06 15:10                                                                       ` Juri Linkov
2021-09-12 16:32                                                                   ` Juri Linkov
2021-09-02 18:46                                               ` martin rudalics
2021-09-03  8:10                                                 ` Juri Linkov
2021-09-02 15:59                                           ` Eli Zaretskii
2021-09-01 15:42               ` Juri Linkov
2021-09-01 19:26                 ` Eli Zaretskii
2021-09-01 12:02             ` Eli Zaretskii
2021-09-01 15:44               ` Juri Linkov
2021-09-01 16:12                 ` Eli Zaretskii
2021-09-01 16:25                   ` Juri Linkov
2021-09-12 17:12         ` Juri Linkov
2021-09-12 17:32       ` Juri Linkov

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=087851c3-b3b1-5130-f4b1-50cd42ef83a8@gmx.at \
    --to=rudalics@gmx.at \
    --cc=50256@debbugs.gnu.org \
    --cc=eliz@gnu.org \
    --cc=juri@linkov.net \
    --cc=larsi@gnus.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).