Changeset 15 in ProjectBuilder for devel/pb/lib

Timestamp:

Jul 30, 2007, 2:47:27 PM (17 years ago)

Author:

Bruno Cornec

Message:

Begin to deal with filters

File:

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

devel/pb/lib/pb.pm

@@ -11 +11 @@
 @ISA = qw(Exporter);
 # global vars are here
-@EXPORT_OK = qw(%defpkgdir %extpkgdir %version &pb_init);
+@EXPORT_OK = qw(%defpkgdir %extpkgdir %version @filteredfiles &pb_init);
 use vars @EXPORT_OK;
 use AppConfig qw(ARGCOUNT_ONE ARGCOUNT_HASH ARGCOUNT_LIST EXPAND_ALL);
@@ -30 +30 @@
 $config->define("extpkgdir" => { ARGCOUNT => ARGCOUNT_HASH });
 $config->define("version" => { ARGCOUNT => ARGCOUNT_HASH });
+$config->define("filteredfiles" => { ARGCOUNT => ARGCOUNT_LIST });
 
 $config->file($conffile);
@@ -53 +54 @@
 %version = %$ptr;
 
+# List of files to filter
+$ptr = $config->get("filteredfiles");
+@filteredfiles = @$ptr;
+
 }
 1;