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

(-)a/catalogue/export.pl (+14 lines)
Lines 7-12 use C4::Auth; Link Here
7
use C4::Output;
7
use C4::Output;
8
use C4::Biblio;
8
use C4::Biblio;
9
use CGI;
9
use CGI;
10
use C4::Ris;
10
11
11
12
12
13
Lines 35-44 if ($op eq "export") { Link Here
35
			}
36
			}
36
			elsif ($format =~ /marcxml/) {
37
			elsif ($format =~ /marcxml/) {
37
				$marc = marc2marcxml($marc);
38
				$marc = marc2marcxml($marc);
39
                $format = "marcxml";
38
			}
40
			}
39
			elsif ($format=~ /mods/) {
41
			elsif ($format=~ /mods/) {
40
				$marc = marc2modsxml($marc);
42
				$marc = marc2modsxml($marc);
43
                $format = "mods";
41
			}
44
			}
45
            elsif ($format =~ /ris/) {
46
                $marc = marc2ris($marc);
47
                $format = "ris";
48
            }
49
            elsif ($format =~ /bibtex/) {
50
                $marc = marc2bibtex($marc);
51
                $format = "bibtex";
52
            }
42
			elsif ($format =~ /dc/) {
53
			elsif ($format =~ /dc/) {
43
				($error,$marc) = marc2dcxml($marc,1);
54
				($error,$marc) = marc2dcxml($marc,1);
44
				$format = "dublin-core.xml";
55
				$format = "dublin-core.xml";
Lines 46-59 if ($op eq "export") { Link Here
46
			elsif ($format =~ /marc8/) {
57
			elsif ($format =~ /marc8/) {
47
				$marc = changeEncoding($marc,"MARC","MARC21","MARC-8");
58
				$marc = changeEncoding($marc,"MARC","MARC21","MARC-8");
48
				$marc = $marc->as_usmarc();
59
				$marc = $marc->as_usmarc();
60
                $format = "marc8";
49
			}
61
			}
50
			elsif ($format =~ /utf8/) {
62
			elsif ($format =~ /utf8/) {
51
				C4::Charset::SetUTF8Flag($marc, 1);
63
				C4::Charset::SetUTF8Flag($marc, 1);
52
				$marc = $marc->as_usmarc();
64
				$marc = $marc->as_usmarc();
65
                $format = "utf8";
53
			}
66
			}
54
            elsif ($format =~ /marcstd/) {
67
            elsif ($format =~ /marcstd/) {
55
                C4::Charset::SetUTF8Flag($marc,1);
68
                C4::Charset::SetUTF8Flag($marc,1);
56
                ($error, $marc) = marc2marc($marc, 'marcstd', C4::Context->preference('marcflavour'));
69
                ($error, $marc) = marc2marc($marc, 'marcstd', C4::Context->preference('marcflavour'));
70
                $format = "marcstd";
57
            }
71
            }
58
			print $query->header(
72
			print $query->header(
59
				-type => 'application/octet-stream',
73
				-type => 'application/octet-stream',
(-)a/koha-tmpl/intranet-tmpl/prog/en/includes/cat-toolbar.inc (-2 / +3 lines)
Lines 144-155 Link Here
144
			 });
144
			 });
145
		}
145
		}
146
		var savemenu = [
146
		var savemenu = [
147
            { text: _("BIBTEX"), url: "/cgi-bin/koha/catalogue/export.pl?format=bibtex&op=export&bib=[% biblionumber %]" },
147
			{ text: _("MODS (XML)"), url: "/cgi-bin/koha/catalogue/export.pl?format=mods&op=export&bib=[% biblionumber %]" },
148
			{ text: _("MODS (XML)"), url: "/cgi-bin/koha/catalogue/export.pl?format=mods&op=export&bib=[% biblionumber %]" },
148
			{ text: _("Dublin Core (XML)"), url: "/cgi-bin/koha/catalogue/export.pl?format=dc&op=export&bib=[% biblionumber %]" },
149
			{ text: _("Dublin Core (XML)"), url: "/cgi-bin/koha/catalogue/export.pl?format=dc&op=export&bib=[% biblionumber %]" },
149
			{ text: _("MARCXML"), url: "/cgi-bin/koha/catalogue/export.pl?format=marcxml&op=export&bib=[% biblionumber %]" },
150
			{ text: _("MARCXML"), url: "/cgi-bin/koha/catalogue/export.pl?format=marcxml&op=export&bib=[% biblionumber %]" },
150
			{ text: _("MARC (non-Unicode/MARC-8)"), url: "/cgi-bin/koha/catalogue/export.pl?format=marc8&op=export&bib=[% biblionumber %]" },
151
			{ text: _("MARC (non-Unicode/MARC-8)"), url: "/cgi-bin/koha/catalogue/export.pl?format=marc8&op=export&bib=[% biblionumber %]" },
151
            { text: _("MARC (Unicode/UTF-8)"), url: "/cgi-bin/koha/catalogue/export.pl?format=utf8&op=export&bib=[% biblionumber %]" },
152
            { text: _("MARC (Unicode/UTF-8)"), url: "/cgi-bin/koha/catalogue/export.pl?format=utf8&op=export&bib=[% biblionumber %]" },
152
            { text: _("MARC (Unicode/UTF-8, Standard)"), url: "/cgi-bin/koha/catalogue/export.pl?format=marcstd&op=export&bib=[% biblionumber %]" }
153
            { text: _("MARC (Unicode/UTF-8, Standard)"), url: "/cgi-bin/koha/catalogue/export.pl?format=marcstd&op=export&bib=[% biblionumber %]" },
154
            { text: _("RIS"), url: "/cgi-bin/koha/catalogue/export.pl?format=ris&op=export&bib=[% biblionumber %]" },
153
		];
155
		];
154
156
155
	    new YAHOO.widget.Button({
157
	    new YAHOO.widget.Button({
156
- 

Return to bug 9665