Gossamer Forum: Products: Gossamer Links: Discussions: What's New Links in Sidebar

Hi,

You could try this global (call it "get_new_links_list");

Code:
sub { 

    Links::init_date(); 

    my $GRAND_TOTAL; 

    require GT::SQL::Condition; 
    my $cond = GT::SQL::Condition->new( 
        isNew => '=' => 'Yes', 
        VIEWABLE 
    ); 

    my $link_db  = $DB->table('Links'); 
    $link_db->select_options("GROUP BY Add_Date", "ORDER BY Add_Date DESC"); 
    my $sth      = $link_db->select(Add_Date => 'COUNT(*)' => $cond); 
    my $total    = 0; 
    $GRAND_TOTAL ||= $DB->table('CatLinks')->count - $DB->table('Links')->count({ isValidated => 'No' });; 

    my $results = ''; 
    my @loop; 
    while (my ($date, $count) = $sth->fetchrow_array) { 
        my $long_date = GT::Date::date_transform($date, GT::Date::FORMAT_DATE, $CFG->{date_long_format}); 
        $date =~ s,\s(.*),,; 
        $results .= qq|<li><a href="$CFG->{build_new_url}/$date$CFG->{build_extension}">$long_date</a> ($count)</li>|; 
        $total += $count; 
        push @loop, { date => $long_date, url => "$CFG->{build_new_url}/$date$CFG->{build_extension}", count => $count }; 
    } 

    return { new_folder_loop => \@loop } 

}

Then call with:

Code:
<%get_new_links_list%> 
<%loop new_folder_loop%> 
  <a href="<%url%>"><%date%></a> (<%count%> links)<br /> 
<%endloop%>

I've tested it locally, and it seems to work ok :)

Cheers

Andy (mod)
andy@ultranerds.co.uk