Changeset 98 in ProjectBuilder for devel/pb/bin

Timestamp:

Sep 3, 2007, 8:33:06 PM (18 years ago)

Author:

Bruno Cornec

Message:

Last removal of VERSION TAG files

File:

• devel/pb/bin/pb (modified) (1 diff)

devel/pb/bin/pb

@@ -123 +123 @@
     pb_cms_init($ENV{'PBPROJ'});
 
-    my ($pkgv, $pkgt) = pb_conf_read("$ENV{'PBCONF'}/$ENV{'PBPROJ'}.pb","pkgversion","pkgtag");
+    my ($pkgv, $pkgt) = pb_conf_read("$ENV{'PBCONF'}/$ENV{'PBPROJ'}.pb","pkgver","pkgtag");
     foreach my $pbpkg (@pkgs) {
-        if (defined $pkgv->$pbpkg) {
-            $pbver = $pkgv->$pbpkg;
+        if ((defined $pkgv) && (defined $pkgv->{$pbpkg})) {
+            $pbver = $pkgv->{$pbpkg};
         } else {
             $pbver = $ENV{'PBVER'};
         }
-        if (defined $pkgt->$pbpkg) {
-            $pbtag = $pkgt->$pbpkg;
+        if ((defined $pkgt) && (defined $pkgt->{$pbpkg})) {
+            $pbtag = $pkgt->{$pbpkg};
         } else {
             $pbtag = $ENV{'PBTAG'};