Metacat

	$$templateVars{'recipient'} = $recipient;

	$$templateVars{'sender'} = $sender;

	my ($x, $y, $z) = split(/\./, $FORM::docid);

	$$templateVars{'docid'} = $docidWithoutRev;

	$$templateVars{'comment'} = $FORM::review;

	$$templateVars{'contactName'} = $contactName;