mhonarc-commits
[Top] [All Lists]

CVS: mharc/bin mbox-month-pack,1.4,1.5 mk-procmailrc,1.26,1.27

2007-02-22 14:07:10
Update of mharc/bin
Modified Files:
	mbox-month-pack mk-procmailrc 
Log Message:
* bin/mk-procmailrc:
  . Added List-Id option to match a message based upon its
    List-Id: header field.
* bin/mbox-month-pack:
  . Added -usesepdate: The date specified in the mailbox message
    separator line will be used instead of the date information
    in the mail header.
* Makefile:
  . Separated out developer targets into dev.mk, protecting active
    archives from getting messed up if one accidentally invoked
    something like 'make clean' or 'make distclean'.


======================================================================
FILE: mharc/bin/mbox-month-pack
<http://www.mhonarc.org/cgi-bin/viewcvs.cgi/*checkout*/mharc/bin/mbox-month-pack?rev=1.5>

<http://www.mhonarc.org/cgi-bin/viewcvs.cgi/mharc/bin/mbox-month-pack.diff?r1=1.4&r2=1.5&diff_format=h>
--- mbox-month-pack	15 Sep 2002 03:33:08 -0000	1.4
+++ mbox-month-pack	22 Feb 2007 21:07:02 -0000	1.5
@@ -51,4 +51,5 @@
 my $noanno = 0;
 my $all = 0;
+my $use_sep_date = 0;
 
 my $outdir = '.';
@@ -69,4 +70,5 @@
     "msgsep=s"    => \$msgsep,
     "outdir=s"    => \$outdir,
+    "usesepdate"  => \$use_sep_date,
     "verbose!"    => \$verbose,
     "yearly!"     => \$yearly,
@@ -267,4 +269,9 @@
 current working directory is used.
 
+=item C<-usesepdate>
+
+Use the date specified in the mailbox message separator instead
+of what is included in the message header.
+
 =item C<-verbose>
 

======================================================================
FILE: mharc/bin/mk-procmailrc
<http://www.mhonarc.org/cgi-bin/viewcvs.cgi/*checkout*/mharc/bin/mk-procmailrc?rev=1.27>

<http://www.mhonarc.org/cgi-bin/viewcvs.cgi/mharc/bin/mk-procmailrc.diff?r1=1.26&r2=1.27&diff_format=h>
--- mk-procmailrc	7 May 2006 02:11:44 -0000	1.26
+++ mk-procmailrc	22 Feb 2007 21:07:02 -0000	1.27
@@ -179,4 +179,5 @@
     @addr = ( );
     @from_addr = ( );
+    @list_id = ( );
 
     if (defined($listdef->{$name}{'address'})) {
@@ -186,4 +187,7 @@
       @from_addr = @{$listdef->{$name}{'from-address'}};
     }
+    if (defined($listdef->{$name}{'list-id'})) {
+      @list_id = @{$listdef->{$name}{'list-id'}};
+    }
 
     if (!scalar(@addr) && !scalar(@from_addr) &&
@@ -218,4 +222,13 @@
         $pm_conditions .= ')'  if (scalar(@addr));
       }
+      if (scalar(@list_id)) {
+        $pm_conditions .= '|('  if (scalar(@addr) || scalar(@from_addr));
+        $pm_conditions .= "^List-Id:[\t ]*<";
+        $pm_conditions .= '('  if (scalar(@list_id) > 1);
+        $pm_conditions .= join('|', @list_id);
+        $pm_conditions .= ')'  if (scalar(@list_id) > 1);
+        $pm_conditions .= '>';
+        $pm_conditions .= ')'  if (scalar(@addr) || scalar(@from_addr));
+      }
       $pm_conditions .= ')' . "\n";
     }
@@ -546,4 +559,20 @@
 for more information.
 
+=item List-Id
+
+List ID of the list.  Many lists utilize the C<List-Id:> field
+to designate messages from a given list.
+
+B<NOTE:> If you are archiving lists that defined the C<List-Id:> field
+for all list messages, using C<List-Id> instead of C<Address> and
+C<From-Address> provides better reliability that messages will
+get properly archived.
+
+For example, if a post to a list comes from a blind-carbon copy,
+then the address of the list may not show up in any of the standard
+recipient fields, but the C<List-Id:> field will still be present.
+
+Multiple C<List-Id> options are allowed.
+
 =item MHonArc-Options
 
@@ -597,5 +626,5 @@
 
 Every archive defined must define at least one C<Address>, C<From-Address>,
-or C<Procmail-Condition> option.
+C<List-Id>, or C<Procmail-Condition> option.
 
 =item *

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