X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FController%2FFile.pm;h=9005d79d621ade9ba238c28cf639918ccd1e02d4;hb=ae32e420b4016d27bd80f866a28bfdbcf20ebe2f;hp=1a244f018054e9e41d8120fbfe41eabdc12fc386;hpb=07aa9777cf738d91300ebfc2c4fce7bab465a303;p=kivitendo-erp.git diff --git a/SL/Controller/File.pm b/SL/Controller/File.pm index 1a244f018..9005d79d6 100644 --- a/SL/Controller/File.pm +++ b/SL/Controller/File.pm @@ -66,6 +66,7 @@ my %file_types = ( 'purchase_invoice' => { gen => 6, gltype => 'ap', dir =>'PurchaseInvoice', model => 'PurchaseInvoice',right => 'import_ap' }, 'vendor' => { gen => 0, gltype => '', dir =>'Vendor', model => 'Vendor', right => 'xx' }, 'customer' => { gen => 1, gltype => '', dir =>'Customer', model => 'Customer', right => 'xx' }, + 'project' => { gen => 0, gltype => '', dir =>'Project', model => 'Project', right => 'xx' }, 'part' => { gen => 0, gltype => '', dir =>'Part', model => 'Part', right => 'xx' }, 'gl_transaction' => { gen => 6, gltype => 'gl', dir =>'GeneralLedger', model => 'GLTransaction', right => 'import_ap' }, 'draft' => { gen => 0, gltype => '', dir =>'Draft', model => 'Draft', right => 'xx' }, @@ -317,10 +318,16 @@ sub action_download { sub action_ajax_get_thumbnail { my ($self) = @_; - my $file = SL::File->get(id => $::form->{file_id}); + my $id = $::form->{file_id}; + my $version = $::form->{file_version}; + my $file = SL::File->get(id => $id); + + $file->version($version) if $version; + my $thumbnail = _create_thumbnail($file, $::form->{size}); - my $overlay_selector = '#enlarged_thumb_' . $::form->{file_id}; + my $overlay_selector = '#enlarged_thumb_' . $id; + $overlay_selector .= '_' . $version if $version; $self->js ->attr($overlay_selector, 'src', 'data:' . $thumbnail->{thumbnail_img_content_type} . ';base64,' . MIME::Base64::encode_base64($thumbnail->{thumbnail_img_content})) ->data($overlay_selector, 'is-overlay-loaded', '1') @@ -399,7 +406,7 @@ sub _do_list { if ( $self->file_type eq 'document' ) { my @object_types; push @object_types, $self->object_type; - push @object_types, qw(dunning dunning1 dunning2 dunning3 dunning_orig_invoice) if $self->object_type eq 'invoice'; # hardcoded object types? + push @object_types, qw(dunning1 dunning2 dunning3 dunning_invoice dunning_orig_invoice) if $self->object_type eq 'invoice'; # hardcoded object types? @files = SL::File->get_all_versions(object_id => $self->object_id, object_type => \@object_types, file_type => $self->file_type,