######################################################################### # 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'}


class="setting_cell2"> Admin Center Links

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

$edit_AClinkc_txt{'3'}

$edit_AClinkc_txt{'4'}

~; } 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~
$AClinks_txt{'?'}
$AClinks_txt{'?'}
$AClinks_txt{'?'}
$AClinks_txt{'?'}
~; $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;