Sadly ... no, it doesn't ...
Here is what the critical part of sub main looks like now ...
my $tab = $DB->table('MyLinks');
my @list = $tab->select( { UserID => $USER->{Username} } )->fetchall_list;
my $table = $DB->table('Links');
$table->select_options("ORDER BY $ord $way", "LIMIT $low,$mh");
my $sth = $table->select( { ID => \@list } );
my %match;
while (my $rec = $sth->fetchrow_hashref) {
unless (exists $match{$rec->{LinkID}}) {
$tags->{saved_links} .= Links::SiteHTML::display('mylinks_link', { %$rec, MyLinks_Font => $tmp->{MyLinks_Font} } );
$match{$rec->{LinkID}}++;
}
}
}... following the modification suggested in http://gossamer-threads.com/..._reply;so=ASC;mh=50;
However, I feel I have reached the end of the line with this one.
Thanks afinir and everybody else for your generous time and thoughtfulness.
Time to move on now, there is another plugin waiting ...
Here is what the critical part of sub main looks like now ...
Code:
if ($tags->{total}) { my $tab = $DB->table('MyLinks');
my @list = $tab->select( { UserID => $USER->{Username} } )->fetchall_list;
my $table = $DB->table('Links');
$table->select_options("ORDER BY $ord $way", "LIMIT $low,$mh");
my $sth = $table->select( { ID => \@list } );
my %match;
while (my $rec = $sth->fetchrow_hashref) {
unless (exists $match{$rec->{LinkID}}) {
$tags->{saved_links} .= Links::SiteHTML::display('mylinks_link', { %$rec, MyLinks_Font => $tmp->{MyLinks_Font} } );
$match{$rec->{LinkID}}++;
}
}
}
However, I feel I have reached the end of the line with this one.
Thanks afinir and everybody else for your generous time and thoughtfulness.
Time to move on now, there is another plugin waiting ...
