CVS: mharc/bin mk-procmailrc,1.19,1.20

Update of /cvsroot/mhonarc/mharc/bin
In directory subversions:/tmp/cvs-serv10495/bin

Modified Files:
	mk-procmailrc 
Log Message:
* Can now specify a mail address to receive all unmatched messages
  via the CATCH_ADDRESS config.sh variable.  This serves as a
  (better?) alternative to the .catch archive.


Index: mk-procmailrc
===================================================================
RCS file: /cvsroot/mhonarc/mharc/bin/mk-procmailrc,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -r1.19 -r1.20
*** mk-procmailrc	29 Sep 2002 03:41:18 -0000	1.19
--- mk-procmailrc	1 Oct 2002 22:45:50 -0000	1.20
***************
*** 4,8 ****
  ##	$Id$
  ##  Description:
! ##	Program to create a procmail recipe file from lists.txt.
  ##	Run script with '-man' option to view manpage for this program.
  ##--------------------------------------------------------------------------##
--- 4,8 ----
  ##	$Id$
  ##  Description:
! ##	Program to create a procmail recipe file from lists.def.
  ##	Run script with '-man' option to view manpage for this program.
  ##--------------------------------------------------------------------------##
***************
*** 49,52 ****
--- 49,53 ----
    my %opt = ( );
    my $clstatus = GetOptions(\%opt,
+     'catch-address=s',
      'catch-archive=s',
      'disable-catch-archive!',
***************
*** 80,83 ****
--- 81,87 ----
  		      $config->{'MSGID_CACHE_SIZE'} ||
  		      16384;
+   my $catch_addr    = $opt{'catch-address'} ||
+ 		      $config->{'CATCH_ADDRESS'} ||
+ 		      "";
    my $catch_arc     = $opt{'catch-archive'} ||
  		      $config->{'CATCH_ARCHIVE'} ||
***************
*** 111,120 ****
    print $outfh <<EOT;
  ##======================================================================
! ##	!!AUTO-CREATED, DO NOT EDIT!!
! ##	Procmail resource file for MHonArc archives
  ##======================================================================
! ##	This recipe is only responsible for storing messages within
! ##	mail folders.  A separate process will be used to generate
! ##	HTML archives.
  ##======================================================================
  
--- 115,123 ----
    print $outfh <<EOT;
  ##======================================================================
! ##!!!!!!!!!!!!!!!!!!!!!! AUTO-CREATED, DO NOT EDIT !!!!!!!!!!!!!!!!!!!!!
  ##======================================================================
! ##  Procmail resource file for mharc archives generated from
! ##    $file
! ##  by $0
  ##======================================================================
  
***************
*** 283,287 ****
    }
  
!   if (!$nocatch) {
      print $outfh <<EOT;
  ##======================================================================
--- 286,303 ----
    }
  
!   if ($catch_addr) {
!     print $outfh <<EOT;
! ##======================================================================
! ##	Send unmatched message to $catch_addr
! ##======================================================================
! :0
! * HAVEMATCH ?? no
! {
!   :0
!   ! $catch_addr
! }
! EOT
! 
!   } elsif (!$nocatch) {
      print $outfh <<EOT;
  ##======================================================================
***************
*** 307,314 ****
    print $outfh <<EOT;
  ##======================================================================
! ##	Final destination, typically discard since at least one of the
! ##	above rules should have matched.  But if paranoid, you can
! ##	have copies delivered to a real mailbox by the -final-dest
! ##	option.
  ##======================================================================
  :0
--- 323,330 ----
    print $outfh <<EOT;
  ##======================================================================
! ## Final destination, generally discard since at least one of the
! ## above rules will have matched.  But if paranoid, or for debugging
! ## you can have all message copied to a real mailbox by the -final-dest
! ## option.
  ##======================================================================
  :0
***************
*** 336,341 ****
  =head1 DESCRIPTION
  
! This program is part of mharc and generates the main procmailrc used by
! the L<filter-spool|filter-spool> program.  The procmailrc is generated
  from C<E<lt>mharc-rootE<gt>/lib/lists.def>.
  
--- 352,357 ----
  =head1 DESCRIPTION
  
! This program generates the main procmailrc used by the
! L<filter-spool|filter-spool> program.  The procmailrc is generated
  from C<E<lt>mharc-rootE<gt>/lib/lists.def>.
  
***************
*** 460,467 ****
  =item No-Search
  
! Boolean option (C<0> or C<1>) if searching should
! be disabled.  If set to C<1>, no search index is created and the
! C<$SEARCH-FORM$> custom resource variable will be set to the empty
! string.
  
  =item Period
--- 476,482 ----
  =item No-Search
  
! Boolean option (C<0> or C<1>) if searching should be disabled.
! If set to C<1>, no search index is created and the C<$SEARCH-FORM$>
! custom MHonArc resource variable will be set to the empty string.
  
  =item Period
***************
*** 508,511 ****
--- 523,534 ----
  
  =over
+ 
+ =item C<-catch-address> I<mail-address>
+ 
+ The name of the email address to forward all unmatched message to.
+ This is an alternative to C<-catch-archive>, and will supercede
+ C<-catch-archive>, if defined.
+ If this option is not specified, the C<CATCH_ADDRESS> variable in
+ C<config.sh> is used.
  
  =item C<-catch-archive> I<name>

---------------------------------------------------------------------
To sign-off this list, send email to majordomo(_at_)mhonarc(_dot_)org with the
message text UNSUBSCRIBE MHONARC-DEV