mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-05 22:20:24 -08:00
Code Issues Projects Releases Wiki Activity

Improve hs-indicator-mouse-toggle-hiding for non-selected windows

Browse source 
* lisp/progmodes/hideshow.el (hs-indicator-mouse-toggle-hiding):
Use 'mouse-set-point' to select the clicked window when it was not selected.
This commit is contained in:
Juri Linkov 2025-11-17 09:34:36 +02:00
parent ec08011af4
commit 1668290c9d
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/hideshow.el
View file

@ -1388,6 +1388,8 @@ Argument E should be the event that triggered this action."
(interactive "e") (interactive "e")
(hs-life-goes-on (hs-life-goes-on
(when hs-show-indicators (when hs-show-indicators
(when (mouse-event-p event)
(mouse-set-point event))
(let* ((overlays (save-excursion (let* ((overlays (save-excursion
(goto-char (posn-point (event-end event))) (goto-char (posn-point (event-end event)))
(overlays-in (pos-bol) (pos-eol)))) (overlays-in (pos-bol) (pos-eol))))