Changeset 424


Ignore:
Timestamp:
May 3, 2008, 1:44:53 AM (11 years ago)
Author:
bruno
Message:
  • Fix a bug in Env.pm (forgot a use)
  • Fix a bug in pb_conf_get_fromfile_if (using last instead of next) and fix #24
Location:
devel
Files:
2 edited

Legend:

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

    r416 r424  
    209209pb_log(2,"DEBUG: pb_conf_get $conffile: ".Dumper(@ptr1)."\n");
    210210pb_log(2,"DEBUG: pb_conf_get input: ".Dumper(@ptr2)."\n");
     211pb_log(2,"DEBUG: pb_conf_get param: ".Dumper(@param)."\n");
    211212
    212213foreach my $i (0..$#param) {
     
    217218    if (not defined $p2) {
    218219        # exit if no p1 either
    219         last if ((not defined $p1) || (not defined $ENV{'PBPROJ'}));
     220        next if ((not defined $p1) || (not defined $ENV{'PBPROJ'}));
    220221        # No ref in p2 so use p1
    221222        $p1->{$ENV{'PBPROJ'}} = $p1->{'default'} if ((not defined $p1->{$ENV{'PBPROJ'}}) && (defined $p1->{'default'}));
  • devel/pb/lib/ProjectBuilder/Env.pm

    r417 r424  
    1616use English;
    1717use File::Basename;
     18use File::stat;
    1819use POSIX qw(strftime);
    1920use lib qw (lib);
Note: See TracChangeset for help on using the changeset viewer.