Changeset 2083

Timestamp:

2001-02-28T16:19:48+13:00 (23 years ago)

Author:

paynter

Message:

Fixed a stupid mistake that I know I've fixed before.

File:

• trunk/gsdl/perllib/classify/phind.pm (modified) (1 diff)

trunk/gsdl/perllib/classify/phind.pm

@@ -294 +294 @@
     elsif ($level eq "document") {
         $dataref = $doc_obj->get_metadata($doc_obj->get_top_section(), $field);
-        foreach $data ($$dataref) {
+        foreach $data ($@dataref) {
         $text .= convert_gml_to_tokens($phrlanguage, $data) . "\n";
         }