Tadashi Okoshi
slash****@users*****
2005年 7月 1日 (金) 01:26:41 JST
Index: affelio/apps/Mixi/AF_app.cfg
diff -u affelio/apps/Mixi/AF_app.cfg:1.3 affelio/apps/Mixi/AF_app.cfg:1.4
--- affelio/apps/Mixi/AF_app.cfg:1.3 Tue Jun 21 02:51:33 2005
+++ affelio/apps/Mixi/AF_app.cfg Fri Jul 1 01:26:41 2005
@@ -3,7 +3,7 @@
[application]
app_name=Mixi
-app_version=0.3
+app_version=0.3.1
app_desc=Affelio Mixiゲートウェイ
app_author=Affelio project
guest_index=index.cgi
Index: affelio/apps/Mixi/index.cgi
diff -u affelio/apps/Mixi/index.cgi:1.5 affelio/apps/Mixi/index.cgi:1.6
--- affelio/apps/Mixi/index.cgi:1.5 Sat Jun 25 20:42:48 2005
+++ affelio/apps/Mixi/index.cgi Fri Jul 1 01:26:41 2005
@@ -1,5 +1,8 @@
#!/usr/bin/perl
+use lib("./extlib/"); #WWW:Mixi
+use WWW::Mixi;
+
use lib("../../extlib"); #general
use HTML::Template;
use CGI;
@@ -87,6 +90,7 @@
if(!($response->is_success)){
err_exit("Could not get list_friend.pl");
}
+#print "<PRE>" . $response->content . "</PRE>";
#Parse
my @friends = $mixi->parse_list_friend( $response );
@@ -101,6 +105,7 @@
#Processing
###########################################################################
$num_friends = @friends;
+
for(my $i=0; $i < $num_friends; $i++){
$friends[$i]->{subject} =
Jcode->new( $friends[$i]->{subject} )->utf8;