[Commit-womb] gnumaint Makefile gnumaint template-active.txt

[Karl Berry]

CVSROOT:        /sources/womb
Module name:    gnumaint
Changes by:     Karl Berry <karl>       07/02/18 00:05:48

Modified files:
        .              : Makefile gnumaint template-active.txt 

Log message:
        allow : in package names, etc.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnumaint/Makefile?cvsroot=womb&r1=1.8&r2=1.9
http://cvs.savannah.gnu.org/viewcvs/gnumaint/gnumaint?cvsroot=womb&r1=1.27&r2=1.28
http://cvs.savannah.gnu.org/viewcvs/gnumaint/template-active.txt?cvsroot=womb&r1=1.6&r2=1.7

Patches:
Index: Makefile
===================================================================
RCS file: /sources/womb/gnumaint/Makefile,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- Makefile    17 Feb 2007 01:41:03 -0000      1.8
+++ Makefile    18 Feb 2007 00:05:48 -0000      1.9
@@ -23,10 +23,11 @@
        gnumaint list maintainers karl $(sep)
        
 test-list-packages:
-       gnumaint list packages $(sep)
-       gnumaint list packages maintained $(sep)
-       gnumaint list packages unmaintained $(sep)
-       gnumaint list packages maintainer karl $(sep)
+#      gnumaint list packages $(sep)
+#      gnumaint list packages maintained $(sep)
+#      gnumaint list packages unmaintained $(sep)
+#      gnumaint list packages maintainer karl $(sep)
+       gnumaint list packages maintainer arenn $(sep)
        
 test-help:
        gnumaint help sendemail $(sep)

Index: gnumaint
===================================================================
RCS file: /sources/womb/gnumaint/gnumaint,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -b -r1.27 -r1.28
--- gnumaint    17 Feb 2007 01:41:03 -0000      1.27
+++ gnumaint    18 Feb 2007 00:05:48 -0000      1.28
@@ -1,6 +1,6 @@
 #!/usr/bin/env tclsh
 # gnumaint - GNU maintainers file maintenance (/gd/gnuorg/maintainers)
-# $Id: gnumaint,v 1.27 2007/02/17 01:41:03 karl Exp $
+# $Id: gnumaint,v 1.28 2007/02/18 00:05:48 karl Exp $
 #
 # Copyright 2007 Free Software Foundation Inc.
 # 
@@ -138,7 +138,7 @@
 }
 
 proc get_entry_label {text} {
-  set entry_regexp "^(.+):.+"
+  set entry_regexp {^([^:]+):.+}
 
   regexp $entry_regexp $text match entry_label
 
@@ -427,12 +427,13 @@
       set maintainer_pkgs [lindex $maintainer 3]
 
       ;# Skip Unmaintained
-      if {$maintainer_name == "Unmaintained"} then {
+      if {$maintainer_name == "unmaintained"} then {
           continue
       }
 
       ;# Skip maintainers with no packages
       if {[llength $maintainer_pkgs] == 0} then {
+          puts "*** no packages for $maintainer_name??"
           continue
       }
 
@@ -509,7 +510,7 @@
       puts $msg
 
       ;# Append an entry into the log file
-      add_to_log "sent activity control email to $maintainer_email for 
packages $pkg_list_str" 
+      add_to_log "sent activity control email to $maintainer_email for 
$pkg_list_str" 
 
       incr maintainer_count;
   }
@@ -759,9 +760,3 @@
 
 # Call the main routine
 main
-
-# Local Variables:
-# mode: tcl
-# End:
-
-### End of file

Index: template-active.txt
===================================================================
RCS file: /sources/womb/gnumaint/template-active.txt,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- template-active.txt 13 Jan 2007 17:05:08 -0000      1.6
+++ template-active.txt 18 Feb 2007 00:05:48 -0000      1.7
@@ -3,8 +3,8 @@
 Have I reached %MAINTAINER_NAME?
 
 fmt:I'm sending you this message on behalf of the GNU Project because
-fmt:you're the maintainer of the GNU %PLURAL_PACKAGE %PACKAGE_LIST.  We
-fmt:would like to verify that you're still there, and still reachable at
+fmt:you're listed as the maintainer of the GNU %PLURAL_PACKAGE %PACKAGE_LIST.
+fmt:We would like to verify that you're still there, and still reachable at
 fmt:the address we have, %MAINTAINER_EMAIL.
 
 If all of that is correct, please just reply to this message.