Merge branch 'hotfix/v6.0.2'

keiranmraine · keiranmraine · commit aef5b0f813b7 · 2017-07-19T10:03:14.000+01:00
diff --git a/perl/bin/brass.pl b/perl/bin/brass.pl
@@ -193,7 +193,7 @@ sub cleanup {
 	my $intermediates_dir = File::Spec->catdir($outdir, 'intermediates');
   my $targz = $basefile.'.intermediates.tar.gz';
   unless(-e $targz && -s $targz) {
-  	system(qq{tar -C $outdir -zcf $targz $intermediates_dir}) and die $!;
+  	system(qq{tar -C $outdir -zcf $targz intermediates}) and die $!;
   }
 
   my $tmplogs = File::Spec->catdir($tmpdir, 'logs');
diff --git a/perl/docs.tar.gz b/perl/docs.tar.gz
diff --git a/perl/lib/Bio/Brass.pm b/perl/lib/Bio/Brass.pm
@@ -46,7 +46,7 @@ our @EXPORT = qw(find_breakpoints find_dusty_vertices
 		 is_dusty get_isolated_bp_alignment get_isolated_bp_surrounding_region
 		 $VERSION);
 
-our $VERSION = '6.0.1';
+our $VERSION = '6.0.2';
 
 =head1 NAME
 

Original file line number	Diff line number	Diff line change
`@@ -193,7 +193,7 @@ sub cleanup {`
`193`	`193`	`my $intermediates_dir = File::Spec->catdir($outdir, 'intermediates');`
`194`	`194`	`my $targz = $basefile.'.intermediates.tar.gz';`
`195`	`195`	`unless(-e $targz && -s $targz) {`
`196`		`- system(qq{tar -C $outdir -zcf $targz $intermediates_dir}) and die $!;`
	`196`	`+ system(qq{tar -C $outdir -zcf $targz intermediates}) and die $!;`
`197`	`197`	`}`
`198`	`198`
`199`	`199`	`my $tmplogs = File::Spec->catdir($tmpdir, 'logs');`