push @{$options{EXCLUDE}},$value;
}
+# Add a file to the ignore list.
+sub AddIgnore { my($option,$file)=@_;
+ $options{IGNORE}->{$file}=1;
+}
+
# This collects non-options values.
sub NonOption {
push @{$options{ARGV}}, @_;
"X=s" => \&AddExclude,
"exclude=s" => \&AddExclude,
+
+ "ignore=s" => \&AddIgnore,
"d" => \$options{D_FLAG},
"remove-d" => \$options{D_FLAG},
"filename=s" => \$options{FILENAME},
- "priority=i" => \$options{PRIORITY},
+ "priority=s" => \$options{PRIORITY},
"flavor=s" => \$options{FLAVOR},
"keep-debug" => \$options{KEEP_DEBUG},
"error-handler=s" => \$options{ERROR_HANDLER},
+
+ "add-udeb=s" => \$options{SHLIBS_UDEB},
+
+ "language=s" => \$options{LANGUAGE},
"<>" => \&NonOption,
);
if ($options{DOINDEP} || $options{DOARCH} || $options{DOSAME}) {
# User specified that all arch (in)dep package be
# built, and there are none of that type.
- error("I have no package to build");
+ warning("I have no package to build");
+ exit(0);
}
push @{$options{DOPACKAGES}},getpackages();
}