aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Iurt
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Iurt')
-rw-r--r--lib/Iurt/Config.pm11
1 files changed, 4 insertions, 7 deletions
diff --git a/lib/Iurt/Config.pm b/lib/Iurt/Config.pm
index c793cba..8426b03 100644
--- a/lib/Iurt/Config.pm
+++ b/lib/Iurt/Config.pm
@@ -47,16 +47,13 @@ Return true.
sub config_usage {
my ($config_usage, $config) = @_;
- print "
-
- Iurt configuration keywords:
-
-";
+ print "\nIurt configuration keywords:\n\n";
$Data::Dumper::Indent = 0;
$Data::Dumper::Terse = 1;
foreach my $k (sort keys %$config_usage) {
- print " $k: $config_usage->{$k}{desc}
- default: ", Data::Dumper->Dump([ $config_usage->{$k}{default} ]), ", current: ", Data::Dumper->Dump([ $config->{$k} ]), "\n";
+ print (" $k: $config_usage->{$k}{desc}\n\t\tdefault: ",
+ Data::Dumper->Dump([ $config_usage->{$k}{default} ]),
+ ", current: ", Data::Dumper->Dump([ $config->{$k} ]), "\n");
}
print "\n\n";
}