Item11603: paul pointed out that script/style/pre/br/html stuff is no…

…t only lowercase git-svn-id: http://svn.foswiki.org/trunk@14209 0b4bb1d4-4e5a-0410-9cc4-b2b747904278
foswiki · Mar 5, 2012 · c887a7f · c887a7f
1 parent fb0762d
commit c887a7f
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/WysiwygPlugin/lib/Foswiki/Plugins/WysiwygPlugin.pm b/WysiwygPlugin/lib/Foswiki/Plugins/WysiwygPlugin.pm
@@ -144,7 +144,7 @@ sub wysiwygEditingDisabledForThisContent {
             return "Text contains macros";
         }
         if (   $exclusions =~ /html/
-            && $_[0] =~ /<\/?((?!literal|verbatim|noautolink|nop|br)\w+)/ )
+            && $_[0] =~ /<\/?((?!literal|verbatim|noautolink|nop|br)\w+)/i )
         {
             print STDERR "WYSIWYG_DEBUG: has html: $1\n"
               if (WHY);
@@ -155,17 +155,17 @@ sub wysiwygEditingDisabledForThisContent {
               if (WHY);
             return "Text contains comments";
         }
-        if ( $exclusions =~ /pre/ && $_[0] =~ /<pre\w/ ) {
+        if ( $exclusions =~ /pre/ && $_[0] =~ /<pre\w/i ) {
             print STDERR "WYSIWYG_DEBUG: has pre\n"
               if (WHY);
             return "Text contains PRE";
         }
-        if ( $exclusions =~ /script/ && $_[0] =~ /<script\W/ ) {
+        if ( $exclusions =~ /script/ && $_[0] =~ /<script\W/i ) {
             print STDERR "WYSIWYG_DEBUG: has script\n"
               if (WHY);
             return "Text contains script";
         }
-        if ( $exclusions =~ /style/ && $_[0] =~ /<style\w/ ) {
+        if ( $exclusions =~ /style/ && $_[0] =~ /<style\W/i ) {
             print STDERR "WYSIWYG_DEBUG: has style\n"
               if (WHY);
             return "Text contains style";