Changeset 963 in ProjectBuilder for devel/pb-modules

Timestamp:

Feb 8, 2010, 3:47:36 AM (15 years ago)

Author:

Bruno Cornec

Message:

r3658@localhost: bruno | 2010-02-07 00:15:25 +0100

• Fix a bug in newve, by calling pb_distrib_init earlier to have the loading of the pb.conf main conf file, used to install default packages.

Location:

devel/pb-modules

Files:

• etc/pb.conf (modified) (1 diff)
• lib/ProjectBuilder/Conf.pm (modified) (4 diffs)
• lib/ProjectBuilder/Distribution.pm (modified) (1 diff)

devel/pb-modules/etc/pb.conf

@@ -224 +224 @@
 osremovedotinver redhat = true
 
-# These deps are needed before setupvm can be run. 
+# These deps are needed before setupvm|ve can be run. 
 # Install them with your distribution in VM or automatically in VE
 osmindep default = perl,sudo,wget,tar,make,gzip

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

@@ -93 +93 @@
     # Add the new one at the end
     my $num = keys %pbconffiles;
+    pb_log(2,"DEBUG: pb_conf_add $cf at position $num\n");
     $pbconffiles{$cf} = $num;
 }
@@ -169 +170 @@
 =item B<pb_conf_get_if>
 
-This function returns a table, corresponding to a set of values querried in the conf files or undef if it doen't exist. It takes a table of keys as an input parameter.
+This function returns a table, corresponding to a set of values queried in the conf files or undef if it doen't exist. It takes a table of keys as an input parameter.
 
 The format of the configurations file is as follows:
@@ -206 +207 @@
 # the most important conf file is first, so read them in reverse order
 foreach my $f (reverse sort { $pbconffiles{$a} <=> $pbconffiles{$b} } keys %pbconffiles) {
+    pb_log(2,"DEBUG: pb_conf_get_if in file $f\n");
     $ptr = pb_conf_get_fromfile_if("$f",$ptr,@param);
 }
@@ -241 +243 @@
 my $p2;
 
-pb_log(2,"DEBUG: pb_conf_get $conffile: ".Dumper(@ptr1)."\n");
-pb_log(2,"DEBUG: pb_conf_get input: ".Dumper(@ptr2)."\n");
-pb_log(2,"DEBUG: pb_conf_get param: ".Dumper(@param)."\n");
+pb_log(2,"DEBUG: pb_conf_get_from_file $conffile: ".Dumper(@ptr1)."\n");
+pb_log(2,"DEBUG: pb_conf_get_from_file input: ".Dumper(@ptr2)."\n");
+pb_log(2,"DEBUG: pb_conf_get_from_file param: ".Dumper(@param)."\n");
 
 foreach my $i (0..$#param) {

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

@@ -439 +439 @@
     $param = $opt->{"default"};
 } else {
-    $param = "unknown";
+    $param = "";
 }
 return($param);