--- mailnotify.orig Mon Nov 18 15:53:06 2002 +++ mailnotify Mon Nov 18 15:54:25 2002 @@ -21,6 +21,7 @@ use TWiki::Net; my $debug = ! ( @ARGV && $ARGV[0] eq "-q" ); +my $diff = ( @ARGV && $ARGV[0] eq "-d" ); &main(); @@ -112,11 +113,13 @@ last; } $frev = ""; + my $script = $diff?'rdiff':'view'; if( $bar[3] ) { if( $bar[3] > 1 ) { $frev = "r1.$bar[3]"; } else { $frev = "NEW"; + $script = 'view'; } } @@ -141,7 +144,7 @@ $debug && print "$bar[0] "; #add new item to topic list in email body - $foo = "- $bar[0] ($wikiuser)\n $scriptUrl/view$scriptSuffix/$webName/$bar[0]\n"; + $foo = "- $bar[0] ($wikiuser)\n $scriptUrl/$script$scriptSuffix/$webName/$bar[0]\n"; $foo =~ s/Main\.//go; $topiclist = "$topiclist$foo"; }