View | Details | Raw Unified | Return to bug 17385
Collapse All | Expand All

(-)a/basket/basket.pl (-1 / +1 lines)
Lines 27-33 use C4::Biblio qw( Link Here
27
);
27
);
28
use C4::Auth qw( get_template_and_user );
28
use C4::Auth qw( get_template_and_user );
29
use C4::Output qw( output_html_with_http_headers );
29
use C4::Output qw( output_html_with_http_headers );
30
use C4::XSLT;
30
use C4::XSLT qw( CustomXSLTExportList );
31
31
32
32
33
use Koha::AuthorisedValues;
33
use Koha::AuthorisedValues;
(-)a/catalogue/export.pl (-2 / +3 lines)
Lines 8-14 use C4::Biblio qw( GetMarcControlnumber ); Link Here
8
use CGI qw ( -utf8 );
8
use CGI qw ( -utf8 );
9
use C4::Ris qw( marc2ris );
9
use C4::Ris qw( marc2ris );
10
use C4::XSLT qw( XSLTParse4Display );
10
use C4::XSLT qw( XSLTParse4Display );
11
11
use Koha::Biblios;
12
12
13
13
14
14
Lines 92-98 if ($op eq "export") { Link Here
92
    my $biblionumber = $query->param("bib");
92
    my $biblionumber = $query->param("bib");
93
    if ($biblionumber){
93
    if ($biblionumber){
94
        my $xslFile = $query->param("file");
94
        my $xslFile = $query->param("file");
95
        my $marc = GetMarcBiblio( { biblionumber => $biblionumber, embed_items => 1 } );
95
        my $biblio = Koha::Biblios->find($biblionumber);
96
        my $marc = $biblio->metadata->record( { embed_items => 1 } );
96
        my $format=$query->param("format")||'txt';
97
        my $format=$query->param("format")||'txt';
97
        my @hiddenitems;
98
        my @hiddenitems;
98
99
(-)a/opac/opac-export.pl (-1 / +2 lines)
Lines 142-148 elsif ( $format =~ /isbd/ ) { Link Here
142
elsif ($format =~ /html/ ) {
142
elsif ($format =~ /html/ ) {
143
    if ($biblionumber){
143
    if ($biblionumber){
144
        my $xslFile = $query->param("file");
144
        my $xslFile = $query->param("file");
145
        $marc = C4::Biblio::GetMarcBiblio({biblionumber => $biblionumber});
145
        my $biblio = Koha::Biblios->find($biblionumber);
146
        $marc = $biblio->metadata->record;
146
        my @hiddenitems;
147
        my @hiddenitems;
147
148
148
        $marc = XSLTParse4Display(
149
        $marc = XSLTParse4Display(
(-)a/virtualshelves/shelves.pl (-2 / +1 lines)
Lines 30-36 use C4::Koha qw( Link Here
30
);
30
);
31
use C4::Members;
31
use C4::Members;
32
use C4::Output qw( pagination_bar output_html_with_http_headers );
32
use C4::Output qw( pagination_bar output_html_with_http_headers );
33
use C4::XSLT qw( XSLTParse4Display );
33
use C4::XSLT qw( XSLTParse4Display CustomXSLTExportList );
34
34
35
use Koha::Biblios;
35
use Koha::Biblios;
36
use Koha::Biblioitems;
36
use Koha::Biblioitems;
37
- 

Return to bug 17385