X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUtil.pm;h=b04cf4905d87435c37e50568c99d48014450264c;hb=bd8b8aa6d37a7dde70d093c5552c29f519ac9613;hp=7d9e63a97b89dde5c9e7cf4e90d36eda0a1cd169;hpb=6ad88bbfb0403ca727ee7ec63eb21c1b153455cc;p=spider.git

diff --git a/perl/DXUtil.pm b/perl/DXUtil.pm
index 7d9e63a9..b04cf490 100644
--- a/perl/DXUtil.pm
+++ b/perl/DXUtil.pm
@@ -572,6 +572,7 @@ sub difft
 		$out .= sprintf ("%s${s}s", $adds?' ':'') if $s;
 		$out ||= sprintf ("%s0s", $adds?' ':'');
 	}
+	$out = '0s' unless length $out;
 	return $out;
 }