--- loncom/automation/batchcreatecourse.pm 2006/05/30 20:05:10 1.13 +++ loncom/automation/batchcreatecourse.pm 2006/05/31 12:57:26 1.14 @@ -1,5 +1,5 @@ # -# $Id: batchcreatecourse.pm,v 1.13 2006/05/30 20:05:10 raeburn Exp $ +# $Id: batchcreatecourse.pm,v 1.14 2006/05/31 12:57:26 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -669,10 +669,10 @@ sub process_date { } if ($entries[2] == 29) { if ($entries[0]%4 != 0) { - $entries[2] == 28; + $entries[2] = 28; } elsif ( $entries[0]%100 == 0 && $entries[0]%400 != 0) { - $entries[2] == 28; + $entries[2] = 28; } } }