[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/barcodes label-print-pdf.pl [rel_2_2]
From: |
Ryan Higgins |
Subject: |
[Koha-cvs] koha/barcodes label-print-pdf.pl [rel_2_2] |
Date: |
Wed, 25 Apr 2007 15:34:27 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_2_2
Changes by: Ryan Higgins <rych> 07/04/25 15:34:27
Modified files:
barcodes : label-print-pdf.pl
Log message:
adding filename to cgi output pdf
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-print-pdf.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.15&r2=1.1.2.16
Patches:
Index: label-print-pdf.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-print-pdf.pl,v
retrieving revision 1.1.2.15
retrieving revision 1.1.2.16
diff -u -b -r1.1.2.15 -r1.1.2.16
--- label-print-pdf.pl 16 Nov 2006 02:15:49 -0000 1.1.2.15
+++ label-print-pdf.pl 25 Apr 2007 15:34:27 -0000 1.1.2.16
@@ -60,7 +60,11 @@
prInitVars();
$| = 1;
-print STDOUT "Content-Type: application/pdf \r\n\r\n";
+#print STDOUT "Content-Disposition: attachment; \r\n";
+#print STDOUT "filename: \"KohaBarcodes.pdf\" \r\n";
+#print STDOUT "Content-Type: application/pdf \r\n\r\n";
+print $cgi->header( -type => 'application/pdf',
+-attachment => 'kohaBarcodes.pdf' );
prFile();
prMbox( $lowerLeftX, $lowerLeftY, $upperRightX, $upperRightY );
@@ -188,5 +192,3 @@
}
prEnd();
-print $cgi->redirect("/intranet-tmpl/barcodes/new.pdf");
-
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/barcodes label-print-pdf.pl [rel_2_2],
Ryan Higgins <=