package  Bot::BasicBot::Pluggable::Module::MySeen;

use Bot::BasicBot::Pluggable::Module::Seen;
use base 'Bot::BasicBot::Pluggable::Module::Seen';

  sub update_seen {
    my ( $self, $who, $channel, $what ) = @_;
    my $nick = lc($who);

   return if ($channel =~ /-admin/i);
    print "UPDATE_SEEN $who $channel $what\n";

    $self->set(
        "seen_$nick" => {
            time    => time,
            channel => $channel,
            what    => $channel ne 'msg' ? $what : '<private message>',
        }
    );
  }

1;