[Affelio-users 60] XREAに1.0.0をインストールしました

Back to archive index

segi****@ra2***** segi****@ra2*****
2005年 8月 29日 (月) 01:16:02 JST


はじめまして。しばいぬと申します。

XREAの無料版に Affelio 1.0.0 をインストールしてみました。
http://segi.s49.xrea.com/x/affelio/ で動いています。

動かすために、色々と変更する点もあったので報告します。

(1) インストールディレクトリは x の下にする
自動的に広告挿入されると動かないので、"x" ディレクトリの下にファイ
ルを置きます。
(http://home1.affelio.jp/user/af_support/apps/fswiki/index.cgi
  ページのXREAを参考にしました)

(2) アプリを動くようにする
インストールは無難に完了しますが、日記・アルバム・Mixiといった、ア
プリを動かすとエラーが出ました。
どうも XREA では Cwd::getcwd() が null を返しているようです。

そこで、
apps/diary/init.pl
apps/album/common/header.pl
apps/album/show_image.cgi
apps/Mixi/admin.cgi
apps/Mixi/index.cgi
の中の
new AffelioApp(ConfigDir => Cwd::getcwd(),
の部分を
my $cwd = `pwd`;
chomp($cwd);
my $afap = new AffelioApp(ConfigDir => $cwd,
とやって、エラーを回避しました。

(3) 日記でサムネイル画像を表示させる
日記でサムネイル画像がうまく表示されなかったので、apps/diary/show_image.cgi
の 40 行目を
$image->Write(file => \*STDOUT); から $image->Write('-'); に
書き換えました。

(4) Mixiで友達リストが出るようにする
apps/Mixi/extlib/WWW/Mixi.pm の 506行目あたりにある
if ($image =~ /<a href=(.*?)><img SRC=(.*?) border=0><\/a>/); を
if ($image =~ /<a href=(.*?)><img.*SRC=(.*?) border=0><\/a>/); に
変更しました。
parseするページの仕様がちょっと変わったのだと思います。

(5) Mixiで自分のページに飛べるようにする
apps/Mixi/index.cgi の 100行目
my $myid = $mixi->parse_self_id( $mixi->get("list_review.pl") ); を
my $myid = 11XXX; と
自分のIDを直接書き込みました。

$mixi->parse_self_id を修正しようかとも思ったのですが、面倒だった
のと、レビューを一本も書いていない場合に list_review.pl に ID が
出るか疑問だったので。


大体、上記のような変更を加えて、動くようになりました。
変更した点は、
http://segi.s49.xrea.com/x/affelio/apps/diary/list_diary.cgi
にも書いています。




Affelio-users メーリングリストの案内
Back to archive index