Gossamer Forum
Home : Products : Links 2.0 : Customization :

Latest Editor Pick

Quote Reply
Latest Editor Pick
Hallo

Could someone tell me how to just list the latest editor's pick?

Insted of listing all the editor's pick, I would just like to have the latest one show up.

Thanks....

Code:


sub build_pick_page {

# --------------------------------------------------------

# Creates a "Editor's Pick" page.

local ($total, $link_results, $title_linked);

my (%link_output, $category_clean);

if ($build_pick_path =~ m,^$build_root_path/(.*)$,) {

&build_dir ($1);

}

$total = 0;

CATEGORY: foreach $category (sort keys %pick_links) {

LINK: for ($i = 0; $i < ($#{$pick_links{$category}}+1) / ($#db_cols + 1); $i++) {

$total++;

%tmp = &array_to_hash ($i, @{$pick_links{$category}});

$link_output{$category} .= &site_html_link (%tmp) . "\n";

}

}

foreach $category (sort keys %pick_links) {

$category_clean = &build_clean ($category);

$link_results .= qq|<P><A HREF="$build_root_url/$category/$build_index">$category_clean</A>\n|;

$link_results .= $link_output{$category};

}

$title_linked = &build_linked_title ("Picks");

open (PICK, ">$build_pick_path/$build_index") or cgierr ("unable to open editor's picks page: $build_pick_path/$build_index. Reason: $!");

print "\tEditor's Picks: $total\n";

print PICK &site_html_pick(@pick_links);

close PICK;

}