Tatsuki SUGIURA
sugi****@users*****
2006年 7月 13日 (木) 10:12:26 JST
Index: slashjp/Slash/Apache/User/User.pm diff -u slashjp/Slash/Apache/User/User.pm:1.5 slashjp/Slash/Apache/User/User.pm:1.6 --- slashjp/Slash/Apache/User/User.pm:1.5 Wed Jul 12 20:41:37 2006 +++ slashjp/Slash/Apache/User/User.pm Thu Jul 13 10:12:26 2006 @@ -1,7 +1,7 @@ # This code is a part of Slash, and is released under the GPL. # Copyright 1997-2005 by Open Source Technology Group. See README # and COPYING for more information, or see http://slashcode.com/. -# $Id: User.pm,v 1.5 2006/07/12 11:41:37 sugi Exp $ +# $Id: User.pm,v 1.6 2006/07/13 01:12:26 sugi Exp $ package Slash::Apache::User; @@ -24,7 +24,7 @@ @ISA = qw(DynaLoader); $VERSION = '2.003000'; # v2.3.0 -($REVISION) = ' $Revision: 1.5 $ ' =~ /\$Revision:\s+([^\s]+)/; +($REVISION) = ' $Revision: 1.6 $ ' =~ /\$Revision:\s+([^\s]+)/; bootstrap Slash::Apache::User $VERSION; @@ -819,6 +819,21 @@ $r->uri('/zoo.pl'); $r->filename($constants->{basedir} . '/zoo.pl'); + } elsif ($op eq 'foes.rdf') { + $r->args("op=foes&nick=$nick&uid=$uid&content_type=foaf"); + $r->uri('/zoo.pl'); + $r->filename($constants->{basedir} . '/zoo.pl'); + + } elsif ($op eq 'foaf.rdf') { + $r->args("op=foaf&nick=$nick&uid=$uid&content_type=foaf"); + $r->uri('/zoo.pl'); + $r->filename($constants->{basedir} . '/zoo.pl'); + + } elsif ($op eq 'friends.rdf') { + $r->args("op=friends&nick=$nick&uid=$uid&content_type=foaf"); + $r->uri('/zoo.pl'); + $r->filename($constants->{basedir} . '/zoo.pl'); + } elsif ($op eq 'amigos') { $r->args("op=friendview&nick=$nick&uid=$uid"); $r->uri('/journal.pl');
スラド