use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("Subject: A new comment has been added to cloud\n\nA new comment has been added to cloud \"$C->{Cloud}{title}\" on page \"$C->{Page}{title}\":\n\nUser:\n$C->{User}{name} (#$C->{User}{id})\n\nComment:\n$C->{Comment}{message}\n\n\nTo review all comments, click the link below:\n$C->{ReviewLink}\n");}