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

Fix the MIME type bug that I introduced when making File assets work with

Browse source 
the exporter properly.
This commit is contained in:
Drake 2006-11-11 00:25:57 +00:00
parent e982302c2a
commit c14b75f606
4 changed files with 29 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/WebGUI/Asset/File.pm
View file

@ -369,14 +369,16 @@ sub www_edit {
}
#-------------------------------------------------------------------
sub www_view {
# setStreamedFile and setRedirect do not interact well with the
# exporter. We have a separate method for this now.
sub exportHtml_view {
my $self = shift;
return $self->session->privilege->noAccess() unless $self->canView;
# if ($self->session->var->get("adminOn")) {
# return $self->session->asset($self->getContainer)->www_view;
# }
# Kludge for now to make this work with the exporter.
my $path = $self->getStorageLocation->getPath($self->get('filename'));
my $fh = eval { FileHandle->new($path) };
defined($fh) or return "";
@ -387,10 +389,15 @@ sub www_view {
}
$fh->close;
return 'chunked';
}
# $self->session->http->setRedirect($self->getFileUrl);
# $self->session->http->setStreamedFile($self->getStorageLocation->getPath($self->get("filename")));
# return '1';
sub www_view {
my $self = shift;
return $self->session->privilege->noAccess() unless $self->canView;
$self->session->http->setRedirect($self->getFileUrl);
$self->session->http->setStreamedFile($self->getStorageLocation->getPath($self->get("filename")));
return 'chunked';
}