#########################################################################
# AClinksAdmin.pl 1.0							#   							
#########################################################################
# YaBB: Yet another Bulletin Board					#								  #			
# Open-Source Community Software for Webmasters				#	 					
# Version:	  YaBB 2						#										#						
# Released:	 May 21, 2006						#	 							#			
# Distributed by: http://www.castlesfamilystore.com			#									#
# ===================================================================== #
# Written by BlogTripper						#   
#########################################################################
if($action eq 'detailedversion') { return 1; }
require "$vardir/AClinks.txt";
&LoadLanguage("AClinks");
if($action eq 'detailedversion') { return 1; }
require "$vardir/AClinks.txt";
&LoadLanguage("AClinks");
Sub AClinks {
	$yymain .= qq~
 
   
     
       | 
		$AClinks_txt{'1'}
	    | 
     
     
       | $AClinkc_txt{'2'}
	    | 
     
	
   
~;
	
}
sub AClinks2 {
	&LoadCookie;          # Load the user's cookie (or set to guest)
	&LoadUserSettings;
	if (!$iamadmin) { &admin_fatal_error("$maintxt{'1'}"); }
	$AClinkTitle       = $FORM{'AClinkTitle'};
	$AClinks       	   = $FORM{'AClinks'};
	$AClinkTitle1      = $FORM{'AClinkTitle1'};
	$AClinks1          = $FORM{'AClinks1'};
	$AClinkTitle2      = $FORM{'AClinkTitle2'};
	$AClinks2          = $FORM{'AClinks2'};
	$AClinkTitle3      = $FORM{'AClinkTitle3'};
	$AClinks3          = $FORM{'AClinks3'};
	$AClinkTitle4      = $FORM{'AClinkTitle4'};
	$AClinks4          = $FORM{'AClinks4'};
	$AClinkTitle5      = $FORM{'AClinkTitle5'};
	$AClinks5          = $FORM{'AClinks5'};
	$AClinkTitle6      = $FORM{'AClinkTitle6'};
	$AClinks6          = $FORM{'AClinks6'};
	$AClinkTitle7      = $FORM{'AClinkTitle7'};
	$AClinks7          = $FORM{'AClinks7'};
	$AClinkTitle8      = $FORM{'AClinkTitle8'};
	$AClinks8          = $FORM{'AClinks8'};
	$AClinkTitle9      = $FORM{'AClinkTitle9'};
	$AClinks9          = $FORM{'AClinks9'};
}
sub AClinksSET { 
	
	&is_admin_or_gmod;
	
	if ($AClinks_en) {
		$chkAClinks = 'checked="checked" ';
	}
	
$yymain .= qq~
~;
	$yytitle = $admin_txt{'222'};
	$action_area = "AClinks";
	&AdminTemplate;
	exit;
}
sub AClinksSET2 {
	
	&is_admin_or_gmod;
	
	$AClinks_en = $FORM{'AClinks_en'} || 0;
	
	my $setfileAClinks = << "EOF";
######################################################################## #######
# AClinks.txt (Admin Center Links Configuration)					#
######################################################################## #######
\$AClinks_en = "$AClinks_en";			# Set to 1 to allow Admin Center Links
1;
EOF
	fopen(ACLINKS, ">$vardir/ACLINKS.txt");
	print ACLINKS $setfileAClinks;
	fclose(ACLINKS);
	
	if ($action eq "AClinks2") {
		$yySetLocation = qq~$adminurl?action=AClinks~;
		&redirectexit;
	}
}
1;