mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

; cperl-mode.el: Fix fontification of flip-flop (Bug#72296)

Browse source 
* lisp/progmodes/cperl-mode.el (cperl-find-pods-heres): Prevent a
movement of point from bleeding into a following clause.
* test/lisp/progmodes/cperl-mode-tests.el (cperl-test-bug-72296):
Add a test for the flip-flop operator with code from the report.
This commit is contained in:
Harald Jörg 2024-07-25 22:00:10 +02:00
parent fcd4e4c895
commit c27055a938
2 changed files with 18 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/cperl-mode.el
View file

@ -4651,7 +4651,7 @@ recursive calls in starting lines of here-documents."
(and (eq (preceding-char) ?\})
(cperl-after-block-p (point-min)))
(and (eq (char-syntax (preceding-char)) ?w)
(progn
(save-excursion
(forward-sexp -1)
;; After these keywords `/'
;; starts a RE. One should