Greenguy's Board


Go Back   Greenguy's Board > Programming & Scripting
Register FAQ Calendar Today's Posts

 
 
Thread Tools Search this Thread Rate Thread Display Modes
Prev Previous Post   Next Post Next
Old 2003-09-21, 10:57 AM   #1
troy
I can spearhead the whole begging thing
 
troy's Avatar
 
Join Date: Apr 2003
Location: nederlands
Posts: 414
Send a message via ICQ to troy
link engine 2.0

Hello,

I am working on my first link list and have let a script installed
link 2.0 by gossamer.
I am trying to make the catagory table more to my liking in color size and space.
I followed the instructions on gossamer forum how to do that
In the folder site_html_templates.pl go to sub site_html_print_cat
make changes in $output = qq|HTMLCODE\n|;
I did that but nothing happens

here is my code I use maybe someone can tell me where I go wrong.

sub site_html_print_cat {
# --------------------------------------------------------
# This routine determines how the list of categories will look.
# We now use a table to split the category name up into two columns.
# For each category you can use the following variables:
#
# $url : The URL to go to that category
# $category_name : The category name with _ and / removed.
# $category_descriptions{$subcat}: The category description (if any).
# $numlinks : The number of links inside that category (and subcategories).
# $mod : The newest link inside of that category.
#

my (@subcat) = @_;
my ($url, $numlinks, $mod, $subcat, $category_name, $description, $output, $i);
my ($half) = int (($#subcat+2) / 2);

# Print Header.
$output = qq|<div><table width="80%" border="3" cellspacing="0" cellpadding="2" bordercolor=#CCCCG><tr><td valign="top" width="50%"><font face="Arial" size=2><a class="link" href="$url"><font face="Arial" size=2 color=#FFFF00><b>$category_name</a> <small class="numlinks">($numlinks)</small>
\n|;
foreach $subcat (sort @subcat) {
($description) = @{$category{$subcat}}[2];

# First let's get the name, number of links, and last modified date...
$url = "$build_root_url/" . &urlencode($subcat) . "/";
if ($subcat =~ m,.*/([^/]+)$,) { $category_name = &build_clean($1); } else { $category_name = &build_clean($subcat); }
$numlinks = $stats{"$subcat"}[0];
$mod = $stats{"$subcat"}[1];

# We check to see if we are half way through, if so we stop this table cell
# and begin a new one (this lets us have category names in two columns).
if ($i == $half) {
$output .= qq| </td><font face="Arial" size=1 color=#FFFF00><td valign="top" width=50%> \n|;
}
$i++;

# Then we print out the name linked, new if it's new, and popular if its popular.
$output .= qq|<B><font face="Arial"size="3"><a href="$url">$category_name</a></font></B>($numlinks)</small> |;
$output .= qq|<small><sup>new</sup></small>| if (&days_old($mod) < $db_new_cutoff);
$output .= qq||;
$output .= qq|<dd><span>$description </span></dd>| if (!($description =~ /^[\s\n]*$/));
$output .= qq||;
}

# Don't forget to end the unordered list..
$output .= "</td></tr></table></div>\n";
return $output;
}

1;

Thanks in advance,
Troy
troy is offline   Reply With Quote
 


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT -4. The time now is 01:13 PM.


Mark Read
Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
© Greenguy Marketing Inc