flip color and what around

diff --git a/src/logger.pl b/src/logger.pl
index 03252aff7dddefd17536c6f13d85c33da100f786..2a5d1d32927cc8af01ef52364f8e854453d9abda 100644 (file)
--- 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));