Changeset 5642 for trunk

Timestamp:

2003-10-15T15:52:03+13:00 (21 years ago)

Author:

kjdon

Message:

fixed another bit of bug related to subcolls with mgpp

File:

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

trunk/gsdl/perllib/mgppbuildproc.pm

@@ -543 +543 @@
 
     # get the parameters for the output
-    my ($fields) = $self->{'index'};
+    # split on : just in case there is subcoll and lang stuff
+    my ($fields) = split (/:/, $self->{'index'});
 
     my ($documenttag) = "";