From: Anti V. <du...@us...> - 2004-03-30 20:49:16
|
Update of /cvsroot/tuxaator/tuxaator/Plugins/Date In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22387/Plugins/Date Modified Files: Plugin.pm Log Message: + assorted fixes Index: Plugin.pm =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/Plugins/Date/Plugin.pm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** Plugin.pm 26 Oct 2003 19:07:57 -0000 1.3 --- Plugin.pm 30 Mar 2004 20:37:05 -0000 1.4 *************** *** 28,31 **** --- 28,36 ---- "restricted" => 0, }, + "!kell" => + { + "action" => "do_kell", + "restricted" => 0, + }, ); *************** *** 45,47 **** --- 50,62 ---- } + sub do_kell + { + my $self = shift; + my $event = pop @_; + my $msg; + ($sec,$min,$hour) = localtime; + $self->{'core'}->queue($event,"$hour:$min"); + + } + 1; |