cosmetical output
authorHeiko Schlittermann (ZARAFA.ctq.de) hs@schlittermann.de
Tue, 26 Apr 2011 23:24:07 +0200
changeset 47 bc0d60c9857b
parent 45 a7624396dd9c
child 48 708e3b8bd670
cosmetical output
sbin/ftbackup
--- a/sbin/ftbackup	Tue Apr 26 22:58:00 2011 +0200
+++ b/sbin/ftbackup	Tue Apr 26 23:24:07 2011 +0200
@@ -509,7 +509,7 @@
 	    $estimates[$l - 1] //= get_estimate($dev, $l - 1);
 
 	    last if my $savings = ($estimates[$l-1] - $estimates[$l]) / $estimates[$l-1] >= 0.10;
-	    warn "% savings for level $dev->{level} on $dev->{dev} are @{[int($savings * 100)]}% ",
+	    warn "% savings for level $dev->{level} on $dev->{dev} are @{[int($savings * 100)]}%: ",
 		 "will use level ", $dev->{level} - 1, "\n";
 	    --$dev->{level};
 	}