Remove highlighting trailing whitespace from cperl-mode

* 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.

diff --git a/etc/NEWS b/etc/NEWS
index 3ad886bdc2b80f7fedfc2147e85e6e9fb28096b6..05fd1b7a390a4058796e64f0cd366333f3fe80db 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -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)
 
 +++

diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 2894f36477a4ac23aec6f25422a81c2b5a00463e..854957320756721621419ee543f45abbd240bb11 100644 (file)
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -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