X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FMinimuf.pm;h=e5ab130f20f1f9e6664f867cacc0e9f32598d5e2;hb=e69b2b430d27710d1bb636f9aa7720da1d067359;hp=d9b9e06fefa252ba5cf46c7971f9cf565ff65bd1;hpb=e90334372dd94c9deca9855be9ac7527a0da7870;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;