diff --git a/Block.pm b/Block.pm
index 9e1a05a..dc7962b 100644
--- a/Block.pm
+++ b/Block.pm
@@ -291,7 +291,7 @@ sub validate_htmlarea {
     my $scrubber = HTML::Scrubber -> new();
     my $nohtml = $scrubber -> scrub($text);
 
-    $nohtml =~ s/[\t\r\n]//g; # Kill some kinds of whitespace that may be left by scrubber that will confuse length checks.
+    $nohtml =~ s/\s//g; # Kill some kinds of whitespace that may be left by scrubber that will confuse length checks.
 
     # If the text area is empty, deal with the whole default/required malarky
     if(!defined($nohtml) || !$nohtml) {