Changeset 49 in ProjectBuilder for devel/pb/lib/pb.pm

Timestamp:

Aug 26, 2007, 11:58:03 AM (17 years ago)

Author:

Bruno Cornec

Message:

conf file is now in the home directory to allow for multi user usage of pb
cms2build and build2pkg are working roughly for pb
Next test with mondo

File:

• devel/pb/lib/pb.pm (modified) (2 diffs)

devel/pb/lib/pb.pm

@@ -9 +9 @@
 use AppConfig qw(ARGCOUNT_HASH ARGCOUNT_ONE);
 use Data::Dumper;
+use vars qw (%pbroot);
 
 sub pb_init {
@@ -28 +29 @@
                             GLOBAL => {
                                 # Each conf item is a hash
-                                ARGCOUNT => ARGCOUNT_ONE,
+                                ARGCOUNT => ARGCOUNT_HASH,
                             },
                         });
 $config->file($conffile);
 my $ptr = $config->get("pbroot") || die "Unable to find pbroot in $conffile";
-return($ptr);
+print "DEBUG: pbroot: ".Dumper($ptr)."\n" if ($debug >= 1);
+%pbroot = %$ptr;
 }