Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-17 05:51:24 +00:00
Code Issues Projects Releases Packages Wiki Activity

(comint--intersect-regions): Fix bug#81243

Browse source 
* lisp/comint.el (comint--intersect-regions): Fix syntax-propertization.
This commit is contained in:
Stefan Monnier 2026-06-16 09:57:48 -04:00
parent ea09986dae
commit a6f5437110
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/comint.el
View file

@ -4234,7 +4234,9 @@ function called, or nil, if no function was called (if BEG = END)."
(eq is-output
(eq (get-text-property (1+ end2) 'field) 'output)))
(setq end2 (field-end end2)))
;; Narrow to the whole field surrounding the region
;; Narrow to the whole field surrounding the region.
;; `syntax-propertize' can't widen so avoid the need to (bug#81243).
(syntax-propertize beg2)
(narrow-to-region beg2 end2))
(setq return-end (list (funcall fun beg1
(marker-position end1)))))