From: Don Armstrong Date: Fri, 29 Dec 2017 22:05:32 +0000 (-0800) Subject: flip color and what around X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=5abe91c89b3419d9ee76791b04ac091fe1e7da81;p=infobot.git flip color and what around --- diff --git a/src/logger.pl b/src/logger.pl index 03252af..2a5d1d3 100644 --- a/src/logger.pl +++ b/src/logger.pl @@ -171,7 +171,7 @@ sub compress { } sub __output { - my ($what,$color,$message) = @_; + my ($color,$what,$message) = @_; my (undef,undef,$line,$subroutine,undef) = caller(2); use String::Escape qw(); status("$color!$what!$ob ".$subroutine.'['.$line.'] '.String::Escape::backslash($message));