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

better regex matchnig behavior

Browse source
This commit is contained in:
Graham Knop 2007-10-05 19:57:38 +00:00
parent f715c29c67
commit 9167097d11
2 changed files with 10 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Mail/Get.pm
View file

@ -236,8 +236,10 @@ sub parseParts {
my $body = $message->bodyhandle;
if (defined $body) {
my $disposition = $message->head->get("Content-Disposition");
$disposition =~ m/filename=\"(.*)\"/;
my $filename = $1;
my $filename = "";
if($disposition =~ m/filename=\"(.*)\"/) {
$filename = $1;
}
return [{content => $body->as_string, type=>$type, filename=>$filename}];
}
my @parts = ();