mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-02 11:50:48 -08:00
Code Issues Projects Releases Wiki Activity

Remove highlighting trailing whitespace from cperl-mode

Browse source 
* lisp/progmodes/cperl-mode.el (cperl-invalid-face): Make
obsolete in favor of 'show-trailing-whitespace'.
(cperl-init-faces): No longer highlight trailing whitespace
separately.
(cperl-praise, cperl-tips-faces): Update documentation for above
change.
This commit is contained in:
Stefan Kangas 2023-10-26 21:09:06 +02:00
parent 3d72fb13a8
commit 2ec90ac8ff
2 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
etc/NEWS
View file

@ -876,6 +876,10 @@ The Perl documentation in info format is no longer distributed with
Perl or on CPAN since more than 10 years. Perl documentation can be
read with 'cperl-perldoc' instead.
*** Highlighting trailing whitespace has been removed.
The user option 'cperl-invalid-face' is now obsolete, and does
nothing. See the user option 'show-trailing-whitespace' instead.
** Emacs Sessions (Desktop)
+++

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

@ -379,6 +379,8 @@ Font for POD headers."
:type 'face
:version "21.1"
:group 'cperl-faces)
(make-obsolete-variable 'cperl-invalid-face
'show-trailing-whitespace "30.1")
(defcustom cperl-pod-here-fontify t
"Not-nil after evaluation means to highlight POD and here-docs sections."
@ -730,7 +732,6 @@ voice);
m) Highlights (by user-choice) either 3-delimiters constructs
(such as tr/a/b/), or regular expressions and `y/tr';
n) Highlights trailing whitespace;
o) Is able to manipulate Perl Regular Expressions to ease
conversion to a more readable form.
p) Can ispell POD sections and HERE-DOCs.
@ -828,7 +829,6 @@ B) Speed of editing operations.
`font-lock-type-face' Overridable keywords
`font-lock-variable-name-face' Variable declarations, indirect array and
hash names, POD headers/item names
`cperl-invalid-face' Trailing whitespace
Note that in several situations the highlighting tries to inform about
possible confusion, such as different colors for function names in
@ -5858,9 +5858,6 @@ functions (which they are not). Inherits from `default'.")
(setq
t-font-lock-keywords
(list
;; -------- trailing spaces -> use invalid-face as a warning
;; (matcher subexp facespec)
`("[ \t]+$" 0 ',cperl-invalid-face t)
;; -------- function definition _and_ declaration
;; (matcher (subexp facespec))
;; facespec is evaluated depending on whether the