Tadashi Okoshi
slash****@users*****
2005年 6月 26日 (日) 21:10:42 JST
Index: affelio/lib/Affelio/App/Admin/FriendsGraph.pm diff -u affelio/lib/Affelio/App/Admin/FriendsGraph.pm:1.2 affelio/lib/Affelio/App/Admin/FriendsGraph.pm:1.3 --- affelio/lib/Affelio/App/Admin/FriendsGraph.pm:1.2 Sat Jun 25 21:14:06 2005 +++ affelio/lib/Affelio/App/Admin/FriendsGraph.pm Sun Jun 26 21:10:42 2005 @@ -4,7 +4,7 @@ # http://affelio.jp/ (Japan) # http://affelio.jp/ (USA and other area) # -# $Id: FriendsGraph.pm,v 1.2 2005/06/25 12:14:06 slash5234 Exp $ +# $Id: FriendsGraph.pm,v 1.3 2005/06/26 12:10:42 slash5234 Exp $ package Affelio::App::Admin::FriendsGraph; { @@ -30,11 +30,14 @@ my @friends_list=(); my $result = $af->{fm}->get_all_friend_list(); + my %tmp_hash; while( my @row = $result->fetchrow_array ){ + $tmp_hash{$row[1]} = $row[7]; + } + undef($result); - my $peer_af_id = $row[1]; - my $last_updated = $row[7]; + while (my ($peer_af_id, $last_updated) = each(%tmp_hash)) { debug_print("FriendsGraph::retrieve: [$peer_af_id]"); ##################################################
