diff --git a/ClanLib/Documentation/Reference/pce2.in b/ClanLib/Documentation/Reference/pce2.in

index c8fc8a8..7770fdf 100644

--- a/ClanLib/Documentation/Reference/pce2.in

+++ b/ClanLib/Documentation/Reference/pce2.in

@@ -667,10 +667,10 @@ sub procNamespace {

 sub procClass {

   my($env,$block,$com)=@_;

-  if (&mask_API($block)=~/^\s*(class|union|struct)\s+(\S+)\s*:(.*){/) { 

+  if (&mask_API($block)=~/^\s*(class|union|struct)\s+(\S+)\s*:(.*)\{/) {

     $env=Class::new($env,$2,$com,$1,$3);

   }

-  elsif (&mask_API($block)=~/^\s*(class|union|struct)\s+(\S+)\s*{/) { 

+  elsif (&mask_API($block)=~/^\s*(class|union|struct)\s+(\S+)\s*\{/) {

     $env=Class::new($env,$2,$com,$1);

   }

   elsif ($block=~/^\s*(union|struct)\s*{/) { 

@@ -1105,7 +1105,7 @@ sub byfullname { $a->{fullname} cmp $b->{fullname}; }

 sub alter {

   my $self=shift;

   my $str=shift;

-  $str=~s/\${/\$\$self{/g;

+  $str=~s/\$\{/\$\$self\{/g;

   $str=~s/\\n/\n/g;

   $str=~s/"/\\"/g;

   eval("\$str=\"$str\";");