Changeset 18569 for gsdl

Timestamp:

2009-02-20T17:20:53+13:00 (15 years ago)

Author:

kjdon

Message:

fixed a bug which meant that a top level folder was showing

File:

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

gsdl/trunk/perllib/classify/SimpleList.pm

@@ -214 +214 @@
 sub get_classify_info {
     my $self = shift (@_);
-    my ($no_thistype) = @_;
+    my ($gli, $no_thistype) = @_;
     $no_thistype = 0 unless defined $no_thistype;
     my $memberof = &supports_memberof();