Metadata properties exposed as template vars

This commit is contained in:
Len Kranendonk 2004-08-04 04:43:41 +00:00
parent f79d615536
commit 6beeebd289

View file

@ -855,6 +855,12 @@ sub processTemplate {
my $templateId = shift;
my $var = shift;
my $namespace = shift || $self->get("namespace");
if ($self->{_useMetaData}) {
my $meta = WebGUI::MetaData::getMetaDataFields($self->get("wobjectId"));
foreach my $field (keys %$meta) {
$var->{$meta->{$field}{fieldName}} = $meta->{$field}{value};
}
}
my %vars = (
%{$self->{_property}},
%{$var}