2561a2562,2579
>    
>    # if the template is case-sensitive,
>    # we can just call the param() method
>    # of the associated objects
>    # if not, we have to set up a case-mapping
>    # table
>    if ($options->{case_sensitive}) {
> 	   foreach my $param (keys %{$self->{param_map}}) {
> 		   next if defined($self->param($param));
> 		   foreach my $associated_object (reverse @{$options->{associate}}) {
> 			   my $value = $associated_object->param($param);
> 			   $self->param($param, $value ), last
> 		      		if defined $value;
> 		}
>   	}
>    }
>    
>    else{
2564a2583
> 	   
2567,2572d2585
<       # what a hack!  This should really be optimized out for case_sensitive.
<       if ($options->{case_sensitive}) {
<         map {
<           $case_map{$associated_object}{$_} = $_
<         } $associated_object->param();
<       } else {
2577d2589
<     }
2586a2599
> 	}