Changeset 6065

Timestamp:

2003-12-01T15:38:32+13:00 (20 years ago)

Author:

jrm21

Message:

changed (!defined nogroupyears) to (! nogroupyears) since parsargv always
defines it, setting it to either 0 or 1

File:

• trunk/gsdl/perllib/classify/DateList.pm (modified) (4 diffs)

trunk/gsdl/perllib/classify/DateList.pm

@@ -78 +78 @@
         'args'     => $arguments };
 
-#  sub print_usage {
-#      print STDERR "
-#    usage: classify DateList [options]
-#    options:
-#   -bymonth  [or bymonth=1]    Classify by year and month
-
-#   Classifier plugin for sorting by date.
-#   Always sorts by 'Date' metadata.
-#   Date is assumed to be in the form yyyymmdd (all digits).
-#   By default dates are split by year - this should change.
-
-#   Any errors are Dana's problem.
-#  ";
-#  }
 
 sub new {
@@ -104 +90 @@
 
     my ($datemeta, $sortmeta);
+    $self->{'nogroupyears'}=0;
     if (!parsargv::parse(\@_, 
                          q^bymonth^, \$self->{'bymonth'},
@@ -188 +175 @@
     # top level
     my $childtype = "HList";
-    if (scalar (@$classlistref) <= 39 && !defined $self->{'nogroupyears'}) {$childtype = "DateList";}
+
+    if (scalar (@$classlistref) <= 39 &&
+    !$self->{'nogroupyears'}) {$childtype = "DateList";}
     my $classifyinfo = $self->get_entry ("Date", $childtype, "Invisible");
 
-    # don't need to do any splitting if there are less than 39 (max + min -1) classifications, unless nogroupyears is specified
-    if ((scalar @$classlistref) <= 39 && !defined $self->{'nogroupyears'}) {
+    # don't need to do any splitting if there are less than 39 (max + min -1)
+    # classifications, unless nogroupyears is specified
+    if ((scalar @$classlistref) <= 39 && !$self->{'nogroupyears'}) {
     foreach $subOID (@$classlistref) {
         push (@{$classifyinfo->{'contains'}}, {'OID'=>$subOID});
@@ -223 +213 @@
 
     # only compact the list if nogroupyears not specified
-    if ( !defined $self->{'nogroupyears'}) {
+    if (!$self->{'nogroupyears'}) {
     $classhash = $self->compactlist ($classhash);
     }