Restore dumping logs for trvis tests

knizhnik · kelvich · commit 5675f3c312f8 · 2017-11-13T02:17:34.000+03:00
diff --git a/Cluster.pm b/Cluster.pm
@@ -209,17 +209,17 @@ sub stop
 	my $nodes = $self->{nodes};
 	$mode = 'fast' unless defined $mode;
 
-	#diag("Dumping logs:");
-	#foreach my $node (@$nodes) {
-		#diag("##################################################################");
-		#diag($node->{_logfile});
-		#diag("##################################################################");
-		#my $filename = $node->{_logfile};
-		#open my $fh, '<', $filename or die "error opening $filename: $!";
-		#my $data = do { local $/; <$fh> };
-		#diag($data);
-		#diag("##################################################################\n\n");
-	#}
+	diag("Dumping logs:");
+	foreach my $node (@$nodes) {
+		diag("##################################################################");
+		diag($node->{_logfile});
+		diag("##################################################################");
+		my $filename = $node->{_logfile};
+		open my $fh, '<', $filename or die "error opening $filename: $!";
+		my $data = do { local $/; <$fh> };
+		diag($data);
+		diag("##################################################################\n\n");
+	}
 
 	my $ok = 1;
 	diag("stopping cluster ${mode}ly");
