Changeset 313 for devel/pb/bin/pb

Timestamp:

02/09/08 02:48:12 (5 years ago)

Author:

bruno

Message:

WARNING: Modifications in progress. DOES NOT WORK
Addition of a different origin for pbconf WIP

File:

• devel/pb/bin/pb (modified) (4 diffs)

devel/pb/bin/pb

@@ -106 +106 @@
 # And get global params
 if (defined $opts{'p'}) {
-    ($ENV{'PBPROJ'},$debug,$LOG, $pbrc, $filteredfiles, $supfiles, $defpkgdir, $extpkgdir) 
+    ($debug,$LOG, $pbrc, $filteredfiles, $supfiles, $defpkgdir, $extpkgdir) 
     = pb_env_init($opts{'p'},$pbinit);
 } else {
-    ($ENV{'PBPROJ'},$debug,$LOG, $pbrc, $filteredfiles, $supfiles, $defpkgdir, $extpkgdir) 
+    ($debug,$LOG, $pbrc, $filteredfiles, $supfiles, $defpkgdir, $extpkgdir) 
     = pb_env_init(undef,$pbinit);
 }
@@ -164 +164 @@
     my $cms=pb_cms_init($ENV{'PBPROJ'});
 
-    my ($pkgv, $pkgt) = pb_conf_read("$ENV{'PBCONF'}/$ENV{'PBPROJ'}.pb","pkgver","pkgtag");
+    my ($pkgv, $pkgt) = pb_conf_get_if("pkgver","pkgtag");
 
     # declare packager for filtering
@@ -985 +985 @@
     print "pb (aka project-builder) Version $projectbuilderver-$projectbuilderrev\n";
     print "\n";
-    print "Syntax: pb [-vhqt][-r pbroot][-p project][[-s script -a account -P port] -m \"mach-1[,...]\"][-i iso] <action> [<pkg1>...]\n";
+    print "Syntax: pb [-vhqt][-r pbroot][-p project][[-s script -a account -P port] -m \"mach-1[,...]\"][-i iso] <action> [<pkg1> ...]\n";
     print "\n";
     print "-h: This help file\n";
@@ -1005 +1005 @@
     print "            to connect on the related VMs.\n";
     print "\n";
-    print "-P port:    Number of the port to use\n";
+    print "-P port:    Port number to use\n";
     print "            to connect on the related VMs.\n";
     print "\n";