[Koha-cvs] koha/export marc.pl [dev_week]

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Joshua Ferraro <kados>	07/03/21 17:23:34

Modified files:
	export         : marc.pl 

Log message:
	fixing the content type so it's downloadable and has a semantically
	sensible name.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/export/marc.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.4.2.6.2.1&r2=1.4.2.6.2.2

Patches:
Index: marc.pl
===================================================================
RCS file: /sources/koha/koha/export/marc.pl,v
retrieving revision 1.4.2.6.2.1
retrieving revision 1.4.2.6.2.2
diff -u -b -r1.4.2.6.2.1 -r1.4.2.6.2.2
--- marc.pl	9 May 2006 09:09:34 -0000	1.4.2.6.2.1
+++ marc.pl	21 Mar 2007 17:23:34 -0000	1.4.2.6.2.2
@@ -13,7 +13,9 @@
 my $query = new CGI;
 my $op=$query->param("op");
 if ($op eq "export") {
-	print $query->header('Content-Type: text/marc');
+    print $query->header(    
+					-type => 'application/octet-stream',
+	                -attachment=>'koha.mrc');
 	my $start_bib = $query->param("start_bib");
 	my $end_bib = $query->param("end_bib");
 	my $dbh=C4::Context->dbh;