X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMinimuf.pm;h=e5ab130f20f1f9e6664f867cacc0e9f32598d5e2;hb=b91254375e95e7931312c4177ee390866f82c648;hp=d9b9e06fefa252ba5cf46c7971f9cf565ff65bd1;hpb=8ccb679964e6761c209fe2c3ee7a1084295dca97;p=spider.git diff --git a/perl/Minimuf.pm b/perl/Minimuf.pm index d9b9e06f..e5ab130f 100644 --- a/perl/Minimuf.pm +++ b/perl/Minimuf.pm @@ -473,7 +473,7 @@ sub ds $s = 0 if $s < 0; my $plus = (($l / 6) >= $s + 0.5) ? '+' : ' '; - return "$c2\S$s$plus"; + return "$c2". "S$s$plus"; } 1;