Lines 67-73
sub target_syntax {
Link Here
|
67 |
if (ref($atom)) { |
67 |
if (ref($atom)) { |
68 |
$atom_content = $atom->target_syntax($server); |
68 |
$atom_content = $atom->target_syntax($server); |
69 |
if ($atom_content) { |
69 |
if ($atom_content) { |
70 |
$atom_content =~ s/"/\\"/g; |
|
|
71 |
$pqf .= ' @or ' x (scalar(@fields) - 1); |
70 |
$pqf .= ' @or ' x (scalar(@fields) - 1); |
72 |
foreach my $attributes (@fields) { |
71 |
foreach my $attributes (@fields) { |
73 |
$attributes->{'attr_string'} ||= ''; |
72 |
$attributes->{'attr_string'} ||= ''; |