our $hsnick = $hsnick_default;
our $hsuser = { NICK => $hsnick, ID => ircd::getAgentUuid($hsnick) };
sub init() {
+$hsuser = { NICK => $hsnick, ID => ircd::getAgentUuid($hsnick) };
import SrSv::DB::StubGen (
dbh => $dbh,
generator => 'services_mysql_stubgen',
}
sub dispatch($$$) {
- $hsuser = { NICK => $hsnick, ID => ircd::getAgentUuid($hsnick) };
my ($user, $dstUser, $msg) = @_;
my $src = $user->{NICK};
$msg =~ s/^\s+//;