124c124,133
< 	$_[0] =~ s/%STARTHIDDEN%(.*?)%ENDHIDDEN%/$1/sg;
---
>     if ($_[0] =~ /%STARTHIDDEN%(.*?)%ENDHIDDEN%/s)
>     {
>             my $wikiUser = TWiki::Func::getWikiUserName();
>             if (!TWiki::Func::checkAccessPermission("hidden", $wikiUser, $_[0], $_[1], $_[2]))
>             {
>                     $_[0] =~ s/(%STARTHIDDEN%(.*?)%ENDHIDDEN%)//sg;
>             }
>     }
>     
>     $_[0] =~ s/%STARTHIDDEN%(.*?)%ENDHIDDEN%/$1/sg;
134c143
<     # This handler is called by getRenderedVersion just before the line loop
---
>     # This handler is called by getRenderedVersion just Before the line loop
137a147
>