equal
deleted
inserted
replaced
89 } |
89 } |
90 } |
90 } |
91 mkdir($basedir); |
91 mkdir($basedir); |
92 #print "Created dir $basedir.\n"; |
92 #print "Created dir $basedir.\n"; |
93 |
93 |
|
94 # create empty summary file anyway |
|
95 open(SUMMARY, ">$basedir/summary.csv"); |
|
96 close(SUMMARY); |
|
97 |
94 my $saxhandler = RaptorSAXHandler->new(); |
98 my $saxhandler = RaptorSAXHandler->new(); |
95 if ($releaseable_module) |
99 if ($releaseable_module) |
96 { |
100 { |
97 print "Adding RaptorReleaseable module to the observers\n"; |
101 print "Adding RaptorReleaseable module to the observers\n"; |
98 $saxhandler->add_observer('RaptorReleaseable', $RaptorReleaseable::reset_status); |
102 $saxhandler->add_observer('RaptorReleaseable', $RaptorReleaseable::reset_status); |