Ignore:
Timestamp:
Feb 26, 2013, 6:37:21 AM (6 years ago)
Author:
bruno
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:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb-modules/lib/ProjectBuilder/Conf.pm

    r1644 r1694  
    2929 
    3030our @ISA = qw(Exporter);
    31 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);
     31our @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);
    3232($VERSION,$REVISION) = pb_version_init();
    3333
     
    388388
    389389
     390=item B<pb_conf_get_all>
     391
     392This function returns an array wirh all configuration parameters
     393
     394=cut
     395
     396sub pb_conf_get_all {
     397
     398return(sort keys %$h);
     399}
     400
     401
    390402=item B<pb_conf_print>
    391403
     
    398410pb_log(0,"Full pb configuration for project $ENV{'PBPROJ'}\n");
    399411pb_log(0,"====================================\n");
    400 foreach my $k (sort keys %$h) {
     412foreach my $k (pb_conf_get_all()) {
    401413    pb_log(0,"$k => ".Dumper($h->{$k})."\n");
    402414}
    403415}
    404 
    405416=back
    406417
Note: See TracChangeset for help on using the changeset viewer.