Changeset 1694 in ProjectBuilder for devel/pb-modules/lib/ProjectBuilder/Conf.pm

Timestamp:

Feb 26, 2013, 6:37:21 AM (11 years ago)

Author:

Bruno Cornec

Message:

• pbdistrogetparam now works, is built & delivered, and has a new -a (all) option
• New function pb_conf_get_all to return the list of all parameters, also now used by pb_conf_print

File:

• devel/pb-modules/lib/ProjectBuilder/Conf.pm (modified) (3 diffs)

devel/pb-modules/lib/ProjectBuilder/Conf.pm

@@ -29 +29 @@
  
 our @ISA = qw(Exporter);
-our @EXPORT = qw(pb_conf_init pb_conf_add pb_conf_read pb_conf_read_if pb_conf_get pb_conf_get_if pb_conf_print);
+our @EXPORT = qw(pb_conf_init pb_conf_add pb_conf_read pb_conf_read_if pb_conf_get pb_conf_get_if pb_conf_print pb_conf_get_all);
 ($VERSION,$REVISION) = pb_version_init();
 
@@ -388 +388 @@
 
 
+=item B<pb_conf_get_all>
+
+This function returns an array wirh all configuration parameters
+
+=cut
+
+sub pb_conf_get_all {
+
+return(sort keys %$h);
+}
+
+
 =item B<pb_conf_print>
 
@@ -398 +410 @@
 pb_log(0,"Full pb configuration for project $ENV{'PBPROJ'}\n");
 pb_log(0,"====================================\n");
-foreach my $k (sort keys %$h) {
+foreach my $k (pb_conf_get_all()) {
     pb_log(0,"$k => ".Dumper($h->{$k})."\n");
 }
 }
-
 =back