From d060a3072cdefa3a14f4a03a3c6c21ed2ec5a109 Mon Sep 17 00:00:00 2001 From: martin f. krafft Date: Wed, 15 Feb 2017 04:43:56 +0100 Subject: Unify print output Signed-off-by: martin f. krafft --- scripts/ctrlact.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'scripts') diff --git a/scripts/ctrlact.pl b/scripts/ctrlact.pl index 6a48773..931b89c 100644 --- a/scripts/ctrlact.pl +++ b/scripts/ctrlact.pl @@ -279,7 +279,7 @@ sub print_levels_for_all { my $net = $arr[$i]->{'server'}->{'tag'} // ''; my ($t, $tt, $match) = get_specific_threshold($type, $name, $net); my $c = ($type eq 'window') ? $arr[$i]->{'refnum'} : $arr[$i]->window()->{'refnum'}; - printf CLIENTCRAP "%4d: %-40.40s → %d (%-8s) match %s", $c, $name, $t, $tt, $match; + Irssi::print(sprintf("%4d: %-40.40s → %d (%-8s) match %s", $c, $name, $t, $tt, $match), MSGLEVEL_CRAP); } } @@ -465,11 +465,11 @@ sub cmd_save { sub cmd_list { Irssi::print("ctrlact: window mappings"); - print CLIENTCRAP get_mappings_table(@window_thresholds); + Irssi::print(get_mappings_table(@window_thresholds), MSGLEVEL_CRAP); Irssi::print("ctrlact: channel mappings"); - print CLIENTCRAP get_mappings_table(@channel_thresholds); + Irssi::print(get_mappings_table(@channel_thresholds), MSGLEVEL_CRAP); Irssi::print("ctrlact: query mappings"); - print CLIENTCRAP get_mappings_table(@query_thresholds); + Irssi::print(get_mappings_table(@query_thresholds), MSGLEVEL_CRAP); } sub parse_args { -- cgit v1.2.3