fopen(ICON, "$boardsdir/$curcat.ico");
@icons = ;
fclose(ICON);
$caticonon = $icons[0];
$caticonoff = $icons[1];
if ($icons[0] eq '') {$icons[0]="on.gif";}
if ($icons[1] eq '') {$icons[1]="off.gif";}
Sources/BoardIndex.pl
foreach $curboard (@{$catboards{$curcat}}) {
chomp $curboard;
fopen(FILE, "$boardsdir/$curboard.dat");
$curboardname = ;
fopen(ICON, "$boardsdir/$curcat.ico");
@icons = ;
fclose(ICON);
$new = qq~ ~;
}
else {
$new = qq~ ~;
if ($icons[0] eq '') {$icons[0]="on.gif";}
$new = qq~ ~;
}
else {
if ($icons[1] eq '') {$icons[1]="off.gif";}
$new = qq~ ~;
 |
EOT
if($showmarkread) {
print qq~ $img{'markallread'}~;
}
print <<"EOT";
|
|
EOT
if($showmarkread) {
print qq~ $img{'markallread'}~;
}
print <<"EOT";
|
english.lng
$txt{'333'} = "New Posts";
$txt{'334'} = "No New Posts";
$icons{'01'} = "New Post Icon:";
$icons{'02'} = "No New Post Icon:";
$icons{'03'} = "(leave empty to use default icon)";
$icons{'04'} = "Place the name for your new post icon.";
$icons{'05'} = "Place the name for your no new post icon.";
$icons{'06'} = "New Icon:";
$icons{'07'} = "No New Icon:";
|