--- nfo/perl/libs/Class/Tom/Code.pm 2003/01/01 21:17:50 1.1 +++ nfo/perl/libs/Class/Tom/Code.pm 2003/01/01 21:18:48 1.2 @@ -56,9 +56,9 @@ } } if ($name eq '__ANON__') { - return indent("sub $code;"); + return $self->indent("sub $code;"); } else { - return indent("sub $name $code;"); + return $self->indent("sub $name $code;"); } }