Changeset 27955

Show
Ignore:
Timestamp:
01.08.2013 16:15:11 (6 years ago)
Author:
kjdon
Message:

supports_memberof needs to be called from self otherwise we don't get to see the class variables

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/classify/RecentDocumentsList.pm

    r23116 r27955  
    173173 
    174174    # may or may not support memberof, depending on options set 
    175     $classifyinfo{'supportsmemberof'} = &supports_memberof(); 
     175    $classifyinfo{'supportsmemberof'} = $self->supports_memberof(); 
    176176 
    177177    # get either all documents (sorted by date), or the top X docs 
     
    204204sub supports_memberof { 
    205205    my $self = shift(@_); 
    206  
    207206    if ($self->{'classify_by_date'}) { 
    208207    return "true";