Changeset 531 in ProjectBuilder

Timestamp:

Aug 12, 2008, 5:23:08 PM (16 years ago)

Author:

Bruno Cornec

Message:

fix pbinit script for mondorescue to support new pb_filter_file function prototype

File:

• projects/mondorescue/pbconf/branches/2.2.7/mondo/pbinit (modified) (2 diffs)

projects/mondorescue/pbconf/branches/2.2.7/mondo/pbinit

@@ -16 +16 @@
 pb_mkdir_p("docs/en");
 pb_mkdir_p("docs/man");
-my $pbpkg = "PBPKG";
-my $pbver = "PBVER";
-my $pbtag = "PBTAG";
-my $pbrev = "PBREV";
-my $pbproj = "PBPROJ";
-my $pbrepo = "PBREPO";
+my $pb->{'pkg'} = "PBPKG";
+my $pb->{'ver'} = "PBVER";
+my $pb->{'tag'} = "PBTAG";
+my $pb->{'rev'} = "PBREV";
+my $pb->{'proj'} = "PBPROJ";
+my $pb->{'repo'} = "PBREPO";
 
 # Action needs to be pbinit
-my ($filteredfiles, $supfiles, $defpkgdir, $extpkgdir) = pb_env_init($pbproj,undef,"pbinit");
+my ($filteredfiles, $supfiles, $defpkgdir, $extpkgdir) = pb_env_init($pb->{'proj'},undef,"pbinit");
 my ($scheme,$uri) = pb_cms_init(undef);
 
@@ -36 +36 @@
 # should call filter_file here
 
-my $ptr = pb_get_filters($pbpkg);
+my $ptr = pb_get_filters($pb->{'pkg'});
 foreach my $f (<docs/mantmp/*>) {
-    pb_filter_file("$f",$ptr,"docs/man/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"","",$pbproj,$pbrepo);
+    pb_filter_file("$f",$ptr,"docs/man/".basename($f),\%pb);
 }
 foreach my $f (<docs/entmp/*>) {
-    pb_filter_file("$f",$ptr,"docs/en/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"","",$pbproj,$pbrepo);
+    pb_filter_file("$f",$ptr,"docs/en/".basename($f),\%pb);
 }
 pb_rm_rf("docs/entmp");