Andreas Wacknitz
2024-03-31 783118944874d559e30eea1600352e3feb5263a7
tools/build-watch.pl
@@ -46,8 +46,6 @@
   '^/usr/lib/locale/',   # ignore locale support
   '^/usr/share/lib/make/',   # ignore make bits
   '^/usr/share/lib/zoneinfo/',   # ignore timezone info
   '/SUNWspro/',      # ignore compiler bits
   '/sunstudio12.1/',   # ignore more compiler bits
   '^/ws/',      # nothing in /ws can be interesting
   '^\.[/\.]{0,1}$'   # ignore ., .., and ./
);
@@ -116,7 +114,7 @@
# Main execution begins here
#
GetOptions("c|command=s" => \$cmd, "i|input-file=s" => \@file,
      "v|verbose" => \$verbose);
      "p|pkg" => \$pkg_flag, "v|verbose" => \$verbose);
if (defined($cmd)) {
   $file = (tempfile(UNLINK => 1))[1];
@@ -132,8 +130,10 @@
($verbose == 1) && printf("*** Processing results...\n");
my ($tools, $files) = process_dtrace_results($file);
($verbose == 1) && printf("*** Generating package requirements...\n");
my ($pkgs) = generate_package_requirements($tools, $files);
if (defined($pkg_flag)) {
   ($verbose == 1) && printf("*** Generating package requirements...\n");
   my ($pkgs) = generate_package_requirements($tools, $files);
}
if (defined($tools)) {
   print "\n";