Attachment #133503 for bug #17385

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




            <div id="export">
                <div class="dropdown">
                    <a id="format" class="btn btn-link btn-lg dropdown-toggle" data-toggle="dropdown" href="#"><i class="fa fa-fw fa-download"></i> Save record <b class="caret"></b></a>
                        <div class="dropdown-menu dropdown-menu-right" role="menu" aria-labelledby="format">
                            [% FOREACH option IN export_options %]
                                [% IF option == 'dc' %]
                                    <a role="menuitem" href="#" data-toggle="modal" data-target="#exportModal_">Dublin Core</a>
                                [% ELSIF option != 'custom' %]
                                <li>
                                    <a role="menuitem" href="/cgi-bin/koha/opac-export.pl?op=export&amp;bib=[% biblio.biblionumber | html %]&amp;format=[% option | html %]">
                                        [% SWITCH option %]
                                            [% CASE 'bibtex' %]BIBTEX

                                            [% CASE 'isbd' %]ISBD
                                        [% END %]
                                    </a>
                                </li>
                                [% ELSE %]
                                    [% FOREACH filesOption IN filesOptions %]
                                        <li><a role="menuitem" href="/cgi-bin/koha/opac-export.pl?format=[% filesOption.format | html %]&amp;op=exportxsl&amp;file=[% filesOption.value | html %]&amp;bib=[% biblionumber | html %]">XSL - [% filesOption.filename | html %]</a></li>
                                    [% END %]
                                [% END %]
                            [% END %]
                        </div>
                </div>
            </div>
        </li>




use Modern::Perl;

use MARC::Record;
use Test::More tests =>  7;
use Test::Warn;
use t::lib::TestBuilder;
use t::lib::Mocks;

    push @$list, { nonsense => 1 };
    $cache->set_in_cache( 'CustomXSLTExportListOPAC', $list );
    my $n = @$list;
    $list = C4::XSLT::CustomXSLTExportList(1);
    is( @$list, $n, 'This list comes from the cache and that is fine' );
    $list = C4::XSLT::CustomXSLTExportList(1);
    $cache->clear_from_cache('CustomXSLTExportListOPAC');
};


    push @$list, { nonsense => 1 };
    $cache->set_in_cache('CustomXSLTExportListOPAC', $list );
    my $n = @$list;
    $list = C4::XSLT::CustomXSLTExportList(1);
    is( @$list, $n, 'This list comes from the cache and that is fine' );
    $list = C4::XSLT::CustomXSLTExportList(1);
    $cache->clear_from_cache('CustomXSLTExportListOPAC');
};
subtest 'CustomXSLTExportList: Check export options' => sub {
- 

Return to bug 17385

Lines 63-74 Link Here

(-)a/koha-tmpl/opac-tmpl/bootstrap/en/includes/opac-detail-sidebar.inc (-5 / +3 lines)
63	<div id="export">	63	<div id="export">
64	<div class="dropdown">	64	<div class="dropdown">
65	<a id="format" class="btn btn-link btn-lg dropdown-toggle" data-toggle="dropdown" href="#"><i class="fa fa-fw fa-download"></i> Save record <b class="caret"></b></a>	65	<a id="format" class="btn btn-link btn-lg dropdown-toggle" data-toggle="dropdown" href="#"><i class="fa fa-fw fa-download"></i> Save record <b class="caret"></b></a>
66	<ul class="dropdown-menu pull-left" role="menu" aria-labelledby="format">	66	<div class="dropdown-menu dropdown-menu-right" role="menu" aria-labelledby="format">
67	[% FOREACH option IN export_options %]	67	[% FOREACH option IN export_options %]
68	[% IF option == 'dc' %]	68	[% IF option == 'dc' %]
69	<li><a role="menuitem" href="#" data-toggle="modal" data-target="#exportModal_">Dublin Core</a></li>	69	<a role="menuitem" href="#" data-toggle="modal" data-target="#exportModal_">Dublin Core</a>
70	[% ELSIF option != 'custom' %]	70	[% ELSIF option != 'custom' %]
71	<li>
72	<a role="menuitem" href="/cgi-bin/koha/opac-export.pl?op=export&bib=[% biblio.biblionumber \| html %]&format=[% option \| html %]">	71	<a role="menuitem" href="/cgi-bin/koha/opac-export.pl?op=export&bib=[% biblio.biblionumber \| html %]&format=[% option \| html %]">
73	[% SWITCH option %]	72	[% SWITCH option %]
74	[% CASE 'bibtex' %]BIBTEX	73	[% CASE 'bibtex' %]BIBTEX
Lines 82-95 Link Here
82	[% CASE 'isbd' %]ISBD	81	[% CASE 'isbd' %]ISBD
83	[% END %]	82	[% END %]
84	</a>	83	</a>
85	</li>
86	[% ELSE %]	84	[% ELSE %]
87	[% FOREACH filesOption IN filesOptions %]	85	[% FOREACH filesOption IN filesOptions %]
88	<li><a role="menuitem" href="/cgi-bin/koha/opac-export.pl?format=[% filesOption.format \| html %]&op=exportxsl&file=[% filesOption.value \| html %]&bib=[% biblionumber \| html %]">XSL - [% filesOption.filename \| html %]</a></li>	86	<li><a role="menuitem" href="/cgi-bin/koha/opac-export.pl?format=[% filesOption.format \| html %]&op=exportxsl&file=[% filesOption.value \| html %]&bib=[% biblionumber \| html %]">XSL - [% filesOption.filename \| html %]</a></li>
89	[% END %]	87	[% END %]
90	[% END %]	88	[% END %]
91	[% END %]	89	[% END %]
92	</ul>	90	</div>
93	</div>	91	</div>
94	</div>	92	</div>
95	</li>	93	</li>

Lines 18-24 Link Here

(-)a/t/db_dependent/XSLT.t (-4 / +3 lines)
18	use Modern::Perl;	18	use Modern::Perl;
19		19
20	use MARC::Record;	20	use MARC::Record;
21	use Test::More tests => 4;	21	use Test::More tests => 7;
22	use Test::Warn;	22	use Test::Warn;
23	use t::lib::TestBuilder;	23	use t::lib::TestBuilder;
24	use t::lib::Mocks;	24	use t::lib::Mocks;
Lines 46-53 subtest 'CustomXSLTExportList: Caching' => sub { Link Here
46	push @$list, { nonsense => 1 };	46	push @$list, { nonsense => 1 };
47	$cache->set_in_cache( 'CustomXSLTExportListOPAC', $list );	47	$cache->set_in_cache( 'CustomXSLTExportListOPAC', $list );
48	my $n = @$list;	48	my $n = @$list;
49	$list = C4::XSLT::CustomXSLTExportList(1);
50	is( @$list, $n, 'This list comes from the cache and that is fine' );	49	is( @$list, $n, 'This list comes from the cache and that is fine' );
		50	$list = C4::XSLT::CustomXSLTExportList(1);
51	$cache->clear_from_cache('CustomXSLTExportListOPAC');	51	$cache->clear_from_cache('CustomXSLTExportListOPAC');
52	};	52	};
53		53
Lines 178-185 subtest 'CustomXSLTExportList: Caching' => sub { Link Here
178	push @$list, { nonsense => 1 };	178	push @$list, { nonsense => 1 };
179	$cache->set_in_cache('CustomXSLTExportListOPAC', $list );	179	$cache->set_in_cache('CustomXSLTExportListOPAC', $list );
180	my $n = @$list;	180	my $n = @$list;
181	$list = C4::XSLT::CustomXSLTExportList(1);
182	is( @$list, $n, 'This list comes from the cache and that is fine' );	181	is( @$list, $n, 'This list comes from the cache and that is fine' );
		182	$list = C4::XSLT::CustomXSLTExportList(1);
183	$cache->clear_from_cache('CustomXSLTExportListOPAC');	183	$cache->clear_from_cache('CustomXSLTExportListOPAC');
184	};	184	};
185	subtest 'CustomXSLTExportList: Check export options' => sub {	185	subtest 'CustomXSLTExportList: Check export options' => sub {
186	-