Tadashi Okoshi
slash****@users*****
2005年 10月 29日 (土) 05:31:03 JST
Index: affelio/lib/Affelio/Managing/MessageManager.pm
diff -u affelio/lib/Affelio/Managing/MessageManager.pm:1.9 affelio/lib/Affelio/Managing/MessageManager.pm:1.10
--- affelio/lib/Affelio/Managing/MessageManager.pm:1.9 Thu Oct 27 20:15:01 2005
+++ affelio/lib/Affelio/Managing/MessageManager.pm Sat Oct 29 05:31:03 2005
@@ -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: MessageManager.pm,v 1.9 2005/10/27 11:15:01 slash5234 Exp $
+# $Id: MessageManager.pm,v 1.10 2005/10/28 20:31:03 slash5234 Exp $
package Affelio::Managing::MessageManager;
{
@@ -182,9 +182,6 @@
Affelio::misc::Debug::debug_print("MM::post_message: start.");
- #DB
- #mid,timestamp,msg_title,msg_type,msg_from,msg_body,readflag
-
##############################
#Get existing max ID
my $sth;
@@ -225,11 +222,16 @@
}
undef($sth);
+
+ my $from_onlyname = $from;
+ $from_onlyname =~ s|<A HREF=".*">(.*)</A>|$1|;
+
##############################
#Email notification if needed
if($af->{userpref__mesging__emailflg} eq "yes"){
my $abs_URL = $af->{site__web_root} . "/admin.cgi?mode=messages&action=show&mid=$newid";
- Affelio::NetLib::Email::send_email($af, "Your Affelio <$af->{user__email1}>", $af->{user__email1}, "New message to your Affelio", $abs_URL);
+ Affelio::NetLib::Email::send_email($af, "Your Affelio <$af->{user__email1}>", $af->{user__email1}, "Message from $from_onlyname", "Click this URL.\n$abs_URL");
+
Affelio::misc::Debug::debug_print("MM::post_message: Email sent!");
}