[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[commit-womb] gnumaint gm
From: |
Karl Berry |
Subject: |
[commit-womb] gnumaint gm |
Date: |
Mon, 30 Jul 2007 00:16:03 +0000 |
CVSROOT: /sources/womb
Module name: gnumaint
Changes by: Karl Berry <karl> 07/07/30 00:16:03
Modified files:
. : gm
Log message:
different structure for list_packages_unanswered now
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnumaint/gm?cvsroot=womb&r1=1.4&r2=1.5
Patches:
Index: gm
===================================================================
RCS file: /sources/womb/gnumaint/gm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- gm 14 Jun 2007 22:11:14 -0000 1.4
+++ gm 30 Jul 2007 00:16:03 -0000 1.5
@@ -1,5 +1,5 @@
#!/usr/bin/env perl
-# $Id: gm,v 1.4 2007/06/14 22:11:14 karl Exp $
+# $Id: gm,v 1.5 2007/07/30 00:16:03 karl Exp $
$DEBUG = 0;
$ACTIVITY_FILE = "activity-report.txt";
@@ -84,7 +84,7 @@
my @pkgs = ();
for my $p (sort { lc($a) cmp lc($b) } keys %pkgs) {
- #&debug_hash ("$p", $pkgs{$p});
+ #&debug_hash ($p, $pkgs{$p});
if (grep { $p eq $_ } @recentrel) {
&debug ("$p recently released, skipping");
@@ -93,7 +93,7 @@
# xx have to only check back to a certain date eventually
&debug ("$p got activity reply, skipping");
- } elsif ($pkgs{$p}->{"name"} eq "unmaintained") {
+ } elsif ($pkgs{$p}[0]->{"name"} eq "unmaintained") {
# xx have to only check back to a certain date eventually
&debug ("$p unmaintained, skipping");
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [commit-womb] gnumaint gm,
Karl Berry <=