[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Try to switch back to log_accum subject lines



Log Message:
-----------
Try to switch back to log_accum subject lines

Modified Files:
--------------
    CVSROOT:
        commitinfo
        loginfo
        activitymail

Revision Data
-------------
Index: commitinfo
===================================================================
RCS file: /cvs/CVSROOT/commitinfo,v
retrieving revision 1.6
retrieving revision 1.7
diff -Lcommitinfo -Lcommitinfo -u -r1.6 -r1.7
--- commitinfo
+++ commitinfo
@@ -14,4 +14,4 @@
 # If the name "ALL" appears as a regular expression it is always used
 # in addition to the first matching regex or "DEFAULT".
 #ALL                     /usr/libexec/cvs/contrib/commit_prep -r
-DEFAULT                  /usr/bin/perl $CVSROOT/CVSROOT/activitymail -lD
+DEFAULT                  /usr/bin/perl $CVSROOT/CVSROOT/activitymail -l
Index: activitymail
===================================================================
RCS file: /cvs/CVSROOT/activitymail,v
retrieving revision 1.2
retrieving revision 1.3
diff -Lactivitymail -Lactivitymail -u -r1.2 -r1.3
--- activitymail
+++ activitymail
@@ -316,14 +316,16 @@
 sub mk_subject {
     my ($msg, $mod, $files) = @_;
     # Strip out all carriage returns.
-    $msg =~ s/\n/ /g;
+    #DB#$msg =~ s/\n/ /g;
+		#DB#
+		$msg = "CVS Update: $mod" if $opt_p;
     # Truncate to first period after a minimum of 10 characters.
-    my $i = index $msg, '. ';
-    $msg = substr($msg, 0, $i + 1) if $i > 0;
+    #DB#my $i = index $msg, '. ';
+    #DB#$msg = substr($msg, 0, $i + 1) if $i > 0;
     # Prepend the filename or top directory.
-    $msg = modified_area($files) . $msg if $opt_S and $opt_c and $files;
+    #DB#$msg = modified_area($files) . $msg if $opt_S and $opt_c and $files;
     # Prepend the module name.
-    $msg = "$mod: $msg" if $opt_p;
+    #DB#$msg = "$mod: $msg" if $opt_p;
     # Prepend the optional message.
     $msg = "$opt_m $msg" if $opt_m;
     # Truncate to the last word under 72 characters.
Index: loginfo
===================================================================
RCS file: /cvs/CVSROOT/loginfo,v
retrieving revision 1.6
retrieving revision 1.7
diff -Lloginfo -Lloginfo -u -r1.6 -r1.7
--- loginfo
+++ loginfo
@@ -26,4 +26,4 @@
 #DEFAULT (echo ""; id; echo %{sVv}; date; cat) >> $CVSROOT/CVSROOT/commitlog
 #^resume     /usr/libexec/cvs/contrib/log_accum -m odin -f $CVSROOT/CVSROOT/ChangeLog -s %s
 #DEFAULT                 /usr/libexec/cvs/contrib/log_accum -m cvs@lists.cleannorth.org -f $CVSROOT/CVSROOT/ChangeLog -s %s
-DEFAULT                  /usr/bin/perl $CVSROOT/CVSROOT/activitymail -dDcf '%{sVv}' -t cvs@lists.cleannorth.org
+DEFAULT                  /usr/bin/perl $CVSROOT/CVSROOT/activitymail -dpcf '%{sVv}' -t cvs@lists.cleannorth.org


Main Menu:

Site Tools:


Here, spammer, have some addresses.