$::lxdebug->enter_sub(2);
my ($self, $right, $dont_abort) = @_;
$::lxdebug->enter_sub(2);
my ($self, $right, $dont_abort) = @_;
my $dbh = $self->dbconnect;
my ($query, $sth, $row, $rights);
my $dbh = $self->dbconnect;
my ($query, $sth, $row, $rights);