X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=serials%2Fserials-edit.pl;h=66d3a4eedd3f6b186efe41091c081505ee193751;hb=a469663d7b0993894582759235c2475f662c8da4;hp=db7620c41377199362ae7b607df24a2b8d63b312;hpb=d80659ce3543d01e0f9e4f280b63f76d00d2a27b;p=koha_fer diff --git a/serials/serials-edit.pl b/serials/serials-edit.pl index db7620c413..66d3a4eedd 100755 --- a/serials/serials-edit.pl +++ b/serials/serials-edit.pl @@ -72,6 +72,7 @@ use C4::Koha; use C4::Output; use C4::Context; use C4::Serials; +use C4::Search qw/enabled_staff_search_views/; use List::MoreUtils qw/uniq/; my $query = CGI->new(); @@ -115,7 +116,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( query => $query, type => 'intranet', authnotrequired => 0, - flagsrequired => { serials => 1 }, + flagsrequired => { serials => 'receive_serials' }, debug => 1, } ); @@ -150,6 +151,7 @@ foreach my $serialid (@serialids) { ) || $serinfo->{'cannotedit'} ); + $serinfo->{editdisable} ||= ($serinfo->{status8} and $serinfo->{closed}); push @serialdatalist, $serinfo; $processedserialid{$serialid} = 1; } @@ -197,6 +199,11 @@ $template->param( subscriptions => \@subscriptionloop ); if ( $op and $op eq 'serialchangestatus' ) { + # Convert serialseqs to UTF-8 to prevent encoding problems + foreach my $seq (@serialseqs) { + utf8::decode($seq) unless utf8::is_utf8($seq); + } + my $newserial; for ( my $i = 0 ; $i <= $#serialids ; $i++ ) { my ($plan_date, $pub_date); @@ -388,24 +395,28 @@ my $default_bib_view = get_default_view(); $template->param( serialsadditems => $serialdatalist[0]->{'serialsadditems'}, callnumber => $serialdatalist[0]->{'callnumber'}, + internalnotes => $serialdatalist[0]->{'internalnotes'}, bibliotitle => $biblio->{'title'}, biblionumber => $serialdatalist[0]->{'biblionumber'}, serialslist => \@serialdatalist, default_bib_view => $default_bib_view, location => $locationlib, + (uc(C4::Context->preference("marcflavour"))) => 1 + ); output_html_with_http_headers $query, $cookie, $template->output; sub get_default_view { my $defaultview = C4::Context->preference('IntranetBiblioDefaultView'); - my $views = { C4::Search::enabled_staff_search_views }; - if ($defaultview eq 'isbd' && $views->{can_view_ISBD}) { + my %views = C4::Search::enabled_staff_search_views(); + if ( $defaultview eq 'isbd' && $views{can_view_ISBD} ) { return 'ISBDdetail'; - } elsif ($defaultview eq 'marc' && $views->{can_view_MARC}) { + } + elsif ( $defaultview eq 'marc' && $views{can_view_MARC} ) { return 'MARCdetail'; - } elsif ($defaultview eq 'labeled_marc' && $views->{can_view_labeledMARC}) { + } + elsif ( $defaultview eq 'labeled_marc' && $views{can_view_labeledMARC} ) { return 'labeledMARCdetail'; - } else { - return 'detail'; } + return 'detail'; }