Tadashi Okoshi
slash****@users*****
2006年 6月 5日 (月) 18:59:30 JST
Index: affelio/lib/Affelio/App/Standalone/FriendRoutines.pm
diff -u affelio/lib/Affelio/App/Standalone/FriendRoutines.pm:1.1 affelio/lib/Affelio/App/Standalone/FriendRoutines.pm:1.2
--- affelio/lib/Affelio/App/Standalone/FriendRoutines.pm:1.1 Tue Mar 7 23:39:09 2006
+++ affelio/lib/Affelio/App/Standalone/FriendRoutines.pm Mon Jun 5 18:59:29 2006
@@ -14,7 +14,7 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
-# $Id: FriendRoutines.pm,v 1.1 2006/03/07 14:39:09 slash5234 Exp $
+# $Id: FriendRoutines.pm,v 1.2 2006/06/05 09:59:29 slash5234 Exp $
package Affelio::App::Standalone::FriendRoutines;
{
@@ -30,7 +30,7 @@
use Exporter;
@Affelio::App::Standalone::FriendRoutines::ISA = "Exporter";
- @Affelio::App::Standalone::FriendRoutines::EXPORT = qw (get_friends_list_IF get_friends_list generate_getcontentURL get_summed_permission_list);
+ @Affelio::App::Standalone::FriendRoutines::EXPORT = qw (get_friends_list generate_getcontentURL get_summed_permission_list);
#####################################################################
#get_summed_permission_list
@@ -144,6 +144,7 @@
my $max_friend_num = shift; #arg(4) max num
my $sort = shift; #arg(5) sort
my $mode = shift; #arg(6) mode
+ my $type = shift; #arg(6) type
my @ret_list;
if ($visitor_id eq ""){
@@ -186,7 +187,8 @@
}
my $sth = $af->getFM->get_all_friend_list(sort => $do_sort,
- order => $do_order);
+ order => $do_order,
+ type => $type);
######################################
#Build up a return array