Changeset 18520


Ignore:
Timestamp:
2009-02-16T11:50:33+13:00 (14 years ago)
Author:
davidb
Message:

The variable $next_classify_num used to be global to the file. This was tied up and made a local variable, however some non-standard classifiers need to access this. Have made it a 'our' variable to keep things tidy, but still allow external access to its value from classifiers.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/classify.pm

    r18455 r18520  
    289289
    290290
     291our $next_classify_num = 1;
     292
    291293# output_classify_info outputs all the info needed for the classification
    292294# to the database
     
    302304
    303305    # get each of the classifications
    304     my $next_classify_num = 1;
    305306    foreach my $classifier (@$classifiers)
    306307    {
Note: See TracChangeset for help on using the changeset viewer.