[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[commit-womb] gnumaint gm gnumaint sendmaintmail
From: |
Karl Berry |
Subject: |
[commit-womb] gnumaint gm gnumaint sendmaintmail |
Date: |
Tue, 21 Aug 2007 23:16:17 +0000 |
CVSROOT: /sources/womb
Module name: gnumaint
Changes by: Karl Berry <karl> 07/08/21 23:16:17
Modified files:
. : gm gnumaint sendmaintmail
Log message:
license to gplv3
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnumaint/gm?cvsroot=womb&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/gnumaint/gnumaint?cvsroot=womb&r1=1.38&r2=1.39
http://cvs.savannah.gnu.org/viewcvs/gnumaint/sendmaintmail?cvsroot=womb&r1=1.5&r2=1.6
Patches:
Index: gm
===================================================================
RCS file: /sources/womb/gnumaint/gm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- gm 30 Jul 2007 00:16:03 -0000 1.5
+++ gm 21 Aug 2007 23:16:16 -0000 1.6
@@ -1,5 +1,23 @@
#!/usr/bin/env perl
-# $Id: gm,v 1.5 2007/07/30 00:16:03 karl Exp $
+# $Id: gm,v 1.6 2007/08/21 23:16:16 karl Exp $
+# More gnumaint-related stuff, since I think better in Perl than TCL.
+#
+# Copyright 2007 Free Software Foundation Inc.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or (at
+# your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+#
+# Originally written by Karl Berry.
$DEBUG = 0;
$ACTIVITY_FILE = "activity-report.txt";
@@ -18,6 +36,9 @@
} elsif ($op eq "unanswered") {
@lines = &list_packages_unanswered ();
+
+ } else {
+ die "$0: unknown operation address@hidden'\n";
}
print map { "$_\n" } @lines;
@@ -239,6 +260,7 @@
#
sub debug_hash
{
+ return unless $DEBUG;
my ($label) = shift;
my (%hash) = (ref $_[0] && $_[0] =~ /.*HASH.*/) ? %{$_[0]} : @_;
@@ -253,6 +275,5 @@
$str .= join (",", @items);
$str .= "}";
- warn "$str\n" if $DEBUG;
+ warn "$str\n";
}
-
Index: gnumaint
===================================================================
RCS file: /sources/womb/gnumaint/gnumaint,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -b -r1.38 -r1.39
--- gnumaint 30 Apr 2007 01:00:15 -0000 1.38
+++ gnumaint 21 Aug 2007 23:16:17 -0000 1.39
@@ -1,22 +1,21 @@
#!/usr/bin/env tclsh
# gnumaint - GNU maintainers file maintenance (/gd/gnuorg/maintainers)
-# $Id: gnumaint,v 1.38 2007/04/30 01:00:15 karl Exp $
+# $Id: gnumaint,v 1.39 2007/08/21 23:16:17 karl Exp $
#
# Copyright 2007 Free Software Foundation Inc.
#
-# This program is free software; you can redistribute it and/or modify
+# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2, or (at your option)
-# any later version.
+# the Free Software Foundation, either version 3 of the License, or (at
+# your option) any later version.
#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software Foundation,
-# Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
#
# Originally written by Jose Marchesi.
Index: sendmaintmail
===================================================================
RCS file: /sources/womb/gnumaint/sendmaintmail,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- sendmaintmail 15 May 2007 00:08:40 -0000 1.5
+++ sendmaintmail 21 Aug 2007 23:16:17 -0000 1.6
@@ -1,22 +1,21 @@
#!/usr/bin/env perl
-# $Id: sendmaintmail,v 1.5 2007/05/15 00:08:40 karl Exp $
+# $Id: sendmaintmail,v 1.6 2007/08/21 23:16:17 karl Exp $
# Send or refrain from sending a message to a maintainer.
#
# Copyright 2007 Free Software Foundation Inc.
#
-# This program is free software; you can redistribute it and/or modify
+# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2, or (at your option)
-# any later version.
+# the Free Software Foundation, either version 3 of the License, or (at
+# your option) any later version.
#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software Foundation,
-# Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
#
# Originally written by Karl Berry.
#
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [commit-womb] gnumaint gm gnumaint sendmaintmail,
Karl Berry <=