sub link_Days_Old {
# -------------------------------------------------------------------
# You call this tag by placing <%Links::Utils::link_Days_Old%> at the
# top of your link.html or detailed.html template, or wherever you
# have "Link" data, and want to use the <%Days_Old%> tag.
#
my ($cutoff, $reset) = shift;
$reset ||= 0;
($reset = 1) && ($cutoff >= $CFG->{'build_new_cutoff'}); ## override reset 0 if cutoff >= cutoff date.
$cutoff ||= $CFG->{'build_new_cutoff'}; ## set cutoff if not set in either of the two places above
my $link = GT::Template->tags; ## load the template tags -- change in Links 2.1 parser
Links::init_date(); ## you can either 'use GT::Date' or do it this way, this is probably better
GT::Date::date_set_format('%ddd% %mmm% %dd% %yyyy%'); ## this is the key to making it work

if (($link->{'isNew'} eq 'Yes') or ($link->{'isNew'} == 1)){
$link->{'Stage_one'} = "I got here";
$link->{'Days_Old'} = GT::Date::date_diff ( GT::Date::date_get(), $link->{'Add_Date'});
if ($link->{'Days_Old'} > $cutoff) {
if ($reset) {
my $LINK_DB = $DB->table('Links');
$LINK_DB->update (
{
isNew => 'No'
},
{
ID => $link->{'ID'}
}
);
}
($link->{'isNew'} eq 'Yes') && ($link->{'isNew'} = 'No');
($link->{'isNew'} eq '1') && ($link->{'isNew'} = '0');
$link->{'Days_Old'} = ''; ## might need to delete $link->{'Days_Old'} in some cases.
}
} else {
$link->{'Days_Old'} = ''; ## might need to delete $link->{'Days_Old'} in some cases.
}
return $link;
}