Changeset 5289 for trunk/MailerContrib/tools/mailnotify

Timestamp:

10/17/09 11:46:21 (3 years ago)

Author:

KennethLavrsen

Message:

Item1302: mailnotify ignores -news operand
It is a bug that goes back to TWiki 4.0. The -news was documented but never implemented
Fixing it as speced would cause trouble for people.
And the spec is bad. It would not work well. So instead of implenting a bad spec I decided to implement -nonews and -nochanges which will give people the flexibility AND maintain status quo for those already$

File:

• trunk/MailerContrib/tools/mailnotify (modified) (3 diffs)

trunk/MailerContrib/tools/mailnotify

@@ -35 +35 @@
 my @webs = ();
 my @exwebs = ();
+my $nonews = 0;
+my $nochanges = 0;
 
 # Called from the command line
@@ -40 +42 @@
     if( $arg eq "-q" ) {
         $verbose = 0;
+    } elsif ( $arg eq "-nonews" ) {
+        $nonews = 1;
+    } elsif ( $arg eq "-nochanges" ) {
+        $nochanges = 1;
     } elsif ( $arg =~ m/^-(.*)/ ) {
         push( @exwebs, $1 );
@@ -51 +57 @@
 
 my $report = Foswiki::Contrib::MailerContrib::mailNotify(
-    \@webs, undef, $verbose, \@exwebs );
+    \@webs, undef, $verbose, \@exwebs, $nonews, $nochanges );
 
 print $report."\n" if $verbose;