root-odJJhXpcy38dnm+
2014-03-25 22:38:16 UTC
This is an automated email from the git hooks/post-receive script.
pterjan pushed a commit to branch master
in repository software/build-system/iurt.
commit e466557e13a03fc2f85a0f0f8941d9dbd6ea8e76
Author: Hartmut Goebel <h.goebel-***@public.gmane.org>
Date: Tue Mar 25 18:19:18 2014 +0100
Enhance readability of --config-help output: remove leading spaces.
---
Commit Link:
http://gitweb.mageia.org/software/build-system/iurt/commit/?id=e466557e13a03fc2f85a0f0f8941d9dbd6ea8e76
lib/Iurt/Config.pm | 11 ++++-------
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";
}
pterjan pushed a commit to branch master
in repository software/build-system/iurt.
commit e466557e13a03fc2f85a0f0f8941d9dbd6ea8e76
Author: Hartmut Goebel <h.goebel-***@public.gmane.org>
Date: Tue Mar 25 18:19:18 2014 +0100
Enhance readability of --config-help output: remove leading spaces.
---
Commit Link:
http://gitweb.mageia.org/software/build-system/iurt/commit/?id=e466557e13a03fc2f85a0f0f8941d9dbd6ea8e76
lib/Iurt/Config.pm | 11 ++++-------
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";
}
--
Mageia Git Monkeys.
Mageia Git Monkeys.