From 31e136cfff339849933b8a686600704b5b4083ba Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Fri, 28 May 1999 01:18:29 +0000 Subject: Notify by mail whenever a related bug changes status. --- process_bug.cgi | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) (limited to 'process_bug.cgi') diff --git a/process_bug.cgi b/process_bug.cgi index f947869bf..314caee9b 100755 --- a/process_bug.cgi +++ b/process_bug.cgi @@ -431,6 +431,8 @@ The changes made were: push(@oldlist, FetchOneColumn()); } my @newlist = sort {$a <=> $b} @{$deps{$target}}; + @dependencychanged{@oldlist} = 1; + @dependencychanged{@newlist} = 1; while (0 < @oldlist || 0 < @newlist) { if (@oldlist == 0 || (@newlist > 0 && @@ -459,11 +461,7 @@ The changes made were: SendSQL("insert into dependencies ($me, $target) values ($id, $i)"); } foreach my $k (@keys) { - if (LogDependencyActivity($k, $snapshot{$k}, $me, - $target)) { - $dependencychanged{$k} = 1; - } - + LogDependencyActivity($k, $snapshot{$k}, $me, $target); } LogDependencyActivity($id, $oldsnap, $target, $me); } @@ -505,7 +503,7 @@ The changes made were: print "Back To BUG# $id\n"; foreach my $k (keys(%dependencychanged)) { - print "

Dependency changed for bug $k

\n"; + print "

Checking for dependency changes on bug $k

\n"; system("./processmail $k $::FORM{'who'}"); print "
Go To BUG# $k
\n"; } -- cgit v1.2.3-24-g4f1b