From: JD Smith <jdtsmith@gmail.com>
To: Eli Zaretskii <eliz@gnu.org>
Cc: emacs-devel@gnu.org
Subject: Re: Temporarily select-window, without updating mode-line face and cursor fill?
Date: Sat, 1 May 2021 18:17:46 -0400 [thread overview]
Message-ID: <904A57C8-C268-412F-815F-782017F47D5D@gmail.com> (raw)
In-Reply-To: <83pmya8d49.fsf@gnu.org>
> Please explain in more detail why do you think you need to select the
> window. What are those "line offsets", and why "move within it"
> requires to select the window?
Update: I managed to avoid selecting the window by using a somewhat more complex line move, based on set-window-start:
(when (/= targ start)
(set-window-start
win
(with-current-buffer (window-buffer win)
(save-excursion
(goto-char wstart)
(forward-line (- targ start))
(point)))))
Here wstart is the window start in the target window. I presume with-current-buffer in the same buffer and set-window-start in the selected window is pretty efficient. I also modified my fast line number function to work with a non-selected window as well (also somewhat convoluted, feedback welcome):
(defun mlscroll-fast-line-number-at-pos (pos &optional win)
"Line number at position.
Compute line number at position POS. Uses fast mode-line
formatting. If WIN is non-nil, find line number at position within
that window."
(string-to-number
(if win
(let ((old (window-point win)))
(set-window-point win pos)
(prog1
(format-mode-line "%l" 0 win)
(set-window-point win old)))
(save-excursion
(goto-char pos)
(format-mode-line "%l" 0)))))
next prev parent reply other threads:[~2021-05-01 22:17 UTC|newest]
Thread overview: 22+ messages / expand[flat|nested] mbox.gz Atom feed top
2021-05-01 18:46 Temporarily select-window, without updating mode-line face and cursor fill? JD Smith
2021-05-01 19:31 ` Eli Zaretskii
2021-05-01 20:32 ` JD Smith
2021-05-02 6:49 ` Eli Zaretskii
2021-05-03 2:15 ` JD Smith
2021-05-03 7:50 ` martin rudalics
2021-05-03 16:16 ` JD Smith
2021-05-03 17:32 ` martin rudalics
2021-05-02 7:40 ` martin rudalics
2021-05-03 2:23 ` JD Smith
2021-05-01 22:17 ` JD Smith [this message]
2021-05-02 6:55 ` Eli Zaretskii
2021-05-03 2:08 ` JD Smith
2021-05-03 2:25 ` Stefan Monnier
2021-05-03 2:49 ` JD Smith
2021-05-04 19:28 ` JD Smith
2021-05-04 19:40 ` Stefan Monnier
2021-05-05 0:49 ` Stefan Kangas
2021-05-05 11:54 ` Eli Zaretskii
2021-05-05 19:32 ` Stefan Kangas
2021-05-05 19:47 ` Stefan Monnier
2021-05-06 0:16 ` JD Smith
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=904A57C8-C268-412F-815F-782017F47D5D@gmail.com \
--to=jdtsmith@gmail.com \
--cc=eliz@gnu.org \
--cc=emacs-devel@gnu.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 external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.