X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ND%2FIRC%2FMisc.pm;h=c6e8db95c95be99949a1f8cc21fa85aca5a009c3;hb=1221916e01a1aa0683a0a914c8dcabd2e0b56312;hp=2b479dd789e2a2ecf84c71a0bf590ffb7f08c237;hpb=55cc621bec16d80555e9e588c731505a8b04e1a9;p=ndwebbie.git diff --git a/ND/IRC/Misc.pm b/ND/IRC/Misc.pm index 2b479dd..c6e8db9 100644 --- a/ND/IRC/Misc.pm +++ b/ND/IRC/Misc.pm @@ -37,12 +37,12 @@ $ND::xanchan = "#ViolatorS"; sub valuecolor { my $s = $_; - $s = $_[1] if defined $_[1]; + $s = $_[1] if $#_ >= 1; $s = "" unless defined $s; - return chr(3)."5$s".chr(3) if $s eq 'Hostile'; - return chr(3)."3$s".chr(3) if $s eq 'Friendly'; - return chr(3)."3$s".chr(3) if $s eq 'Nap' or $s eq 'NAP'; - return chr(2)."$s".chr(2) if $_[0]; + return chr(3)."5$s".chr(15) if $s eq 'Hostile'; + return chr(3)."3$s".chr(15) if $s eq 'Friendly'; + return chr(3)."3$s".chr(15) if $s eq 'Nap' or $s eq 'NAP'; + return chr(2)."$s".chr(15) if $_[0]; return $s; }