You are right, it was actually only giving one category... and I haven't noticed it all the time....
Anyway, the follwoing works on my site, so it should also on yours,
my $id = shift;
my $cat_db = $DB->table('Category');
my $catlink = $DB->table('CatLinks','Category');
my @names = $catlink->select ({ LinkID => $id }, ['Full_Name'])->fetchall_list;
my @link_cats;
for (@names) {
push @link_cats, { cat_name => Links::Build::build ('title_unlinked',$_), cat_url => $cat_db->as_url($_)};
}
return { link_cats => \@link_cats };
}Of course I have an interesting homepage
Ivan
-----
Iyengar Yoga Resources / GT Plugins
Anyway, the follwoing works on my site, so it should also on yours,
Code:
sub { my $id = shift;
my $cat_db = $DB->table('Category');
my $catlink = $DB->table('CatLinks','Category');
my @names = $catlink->select ({ LinkID => $id }, ['Full_Name'])->fetchall_list;
my @link_cats;
for (@names) {
push @link_cats, { cat_name => Links::Build::build ('title_unlinked',$_), cat_url => $cat_db->as_url($_)};
}
return { link_cats => \@link_cats };
}
Ivan
-----
Iyengar Yoga Resources / GT Plugins