[commit-womb] gnumaint gm

[Karl Berry]

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");