| Next: Yawns::Comments | Previous: Yawns::Comment | [Table of Contents] |
Yawns::Comment::Notifier - Alert a user of a comment reply.
#!/usr/bin/perl -w
use Yawns::Comment::Notifier;
use strict;
my $alert = Yawns::Comment::Notifier->new( article => 1,
comment => 0 );
$alert->send();
This module contains code for notifying a user that there is a comment posted, either:
* In reply to a comment they left upon the site. * In reply to a weblog entry they made. * In reply to an article they wrote.
Create a new instance of this object.
This routine is invoked when a new comment is posted upon the site, it is responsible for sending out a notification email or message. This depends upon the preferences of the recipient.
Return the keys we have available for notication use. This is used for cache cleaning, and testing.
See if the user wants the given notifications
Delete any notification options for the given user.
Setup the default options for a new user.
Save updated preferences
Process a comment which has been posted in response to an article.
Reply to a posted comment
Reply to a weblog entry
Clean any cached content we might have.
Steve Kemp
http://www.steve.org.uk/
Copyright (c) 2005,2006 by Steve Kemp. All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The LICENSE file contains the full text of the license.