use Data::Dumper;
print "TAGS: ", Dumper \@tags;
print "VALS: ", Dumper \@tags_vals;
- if(defined($parent))
- {
- push(@andclauses, "( t2.parents_id=$parent )");
- }
+
+ push(@andclauses, "( t2.parents_id=" . (defined($parent) ? $parent : "''") . " )");
if(@tags)
{
push(@orclauses, "( t2.parents_id='' AND t2.id NOT IN ( " . join(', ', @tags) ." ) )");
my($tag, $val)=@$pair;
push(@orclauses, "( t1.parents_id=$tag AND t1.id=$val )");
}
- if($parent)
- {
- push(@andclauses, "( t1.parents_id=$parent )");
- }
+# push(@andclauses, "( t1.parents_id=" . (defined($parent) ? $parent : "''") . " )");
if(@orclauses)
{
push(@andclauses, join("\n\t\tOR ", @orclauses));