oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

and we officially have email to discussion working

Browse source
This commit is contained in:
JT Smith 2006-04-10 13:21:46 +00:00
parent f4376ab5be
commit a15795519d
2 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/User.pm
View file

@ -489,7 +489,7 @@ sub newByEmail {
my $class = shift;
my $session = shift;
my $email = shift;
my ($id) = $session->dbSlave->quickArray("select userId from userProfileData where fieldName='mail' and fieldData=?",[$email]);
my ($id) = $session->dbSlave->quickArray("select userId from userProfileData where fieldName='email' and fieldData=?",[$email]);
my $user = $class->new($session, $id);
return undef unless $user->username;
return $user;

4
lib/WebGUI/Workflow/Activity/GetCsMail.pm
View file

@ -71,7 +71,7 @@ sub addPost {
my $class = (ref $parent eq "WebGUI::Asset::Wobject::Collaboration") ? "WebGUI::Asset::Post::Thread" : "WebGUI::Asset::Post";
foreach my $part (@{$message->{parts}}) {
if (($part->{type} eq "text/plain" || $part->{type} eq "text/html") && $part->{filename} eq "") {
my $text = $message->{content};
my $text = $part->{content};
if ($part->{type} eq "text/plain") {
$text =~ s/\n/\<br \/\>/g;
}
@ -86,7 +86,7 @@ sub addPost {
menuTitle => $message->{subject},
url=>$message->{subject},
content=>$content,
ownerUserId=>$user->getId,
ownerUserId=>$user->userId,
username=>$user->profileField("alias") || $user->username,
});
if (scalar(@attachments)) {