From 4edab9788a284886731f41a1bb522ba5d814a142 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sat, 19 Apr 2014 11:27:16 +0200 Subject: perl_checker cleanups --- lib/Iurt/Config.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/Iurt/Config.pm') diff --git a/lib/Iurt/Config.pm b/lib/Iurt/Config.pm index 8426b03..a1a1e84 100644 --- a/lib/Iurt/Config.pm +++ b/lib/Iurt/Config.pm @@ -51,9 +51,9 @@ sub config_usage { $Data::Dumper::Indent = 0; $Data::Dumper::Terse = 1; foreach my $k (sort keys %$config_usage) { - print (" $k: $config_usage->{$k}{desc}\n\t\tdefault: ", + print " $k: $config_usage->{$k}{desc}\n\t\tdefault: ", Data::Dumper->Dump([ $config_usage->{$k}{default} ]), - ", current: ", Data::Dumper->Dump([ $config->{$k} ]), "\n"); + ", current: ", Data::Dumper->Dump([ $config->{$k} ]), "\n"; } print "\n\n"; } -- cgit v1.2.1