# work out if they are allowed to access this detailed page...
sub check_restrict_detail_page {

my ($page, $id, $link, $detail_match, $detail_name);
my (@ids,@locked);
$page = $IN->param('g') || $ENV{PATH_INFO} || '';
my $id;
if ($page =~ /(\d+)/) {
$id = $1;
}

if (!$id) {
print $IN->header();
print Links::SiteHTML::display('error', { error => Links::language('PAGE_INVALIDDETAIL', $page) });
return;
}

if ($DEBUG) {
print $IN->header();
print $id;
exit;
}

# grab the category in questions details....
my $cat_id = $DB->table('CatLinks')->select( { LinkID => $id } )->fetchrow;
if ($DB->table('Category')->count( { Restricted_Page => 1, ID => $cat_id } ) > 0 && !$USER->{Username}) {
print $IN->header();
print Links::SiteHTML::display('error', { error => $ErrorMessage } );
exit;
}

}