Tadashi Okoshi
slash****@users*****
2005年 6月 28日 (火) 23:07:21 JST
Index: affelio/lib/Affelio/App/Admin/Messaging.pm diff -u affelio/lib/Affelio/App/Admin/Messaging.pm:1.8 affelio/lib/Affelio/App/Admin/Messaging.pm:1.9 --- affelio/lib/Affelio/App/Admin/Messaging.pm:1.8 Tue Jun 28 21:32:23 2005 +++ affelio/lib/Affelio/App/Admin/Messaging.pm Tue Jun 28 23:07:21 2005 @@ -4,7 +4,7 @@ # http://affelio.jp/ (Japan) # http://affelio.jp/ (USA and other area) # -# $Id: Messaging.pm,v 1.8 2005/06/28 12:32:23 slash5234 Exp $ +# $Id: Messaging.pm,v 1.9 2005/06/28 14:07:21 slash5234 Exp $ package Affelio::App::Admin::Messaging; { @@ -12,6 +12,7 @@ use lib("../../../../extlib/"); use Error qw(:try); + use MIME::Base64::Perl; use lib("../../../"); use Affelio; use Affelio::misc::CGIError; @@ -171,6 +172,10 @@ my @message= $af->{mesgm}->retrieve_message($mid); my ($msg_mid, $msg_timestamp, $msg_title, $msg_type, $msg_from, $msg_body, $msg_readflag) = @message; + + if($msg_type=~ /Encode\-Base64/){ + $msg_body = decode_base64($msg_body); + } debug_print("show_message: $msg_from $msg_title $msg_type $msg_body"); $msg_timestamp = timestamp2string($msg_timestamp);