# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-require Exporter;
+
use strict;
use C4::Context;
print "Content-Disposition: attachment; filename = $filename\n\n";
print $cgi->header(-type => 'application/pdf'),
$cgi->start_html(-title=>"Codify to PDF");
-open fh, "<$tmpFileName";
-while (<fh>) {
- print;
+open FH, "<$tmpFileName";
+while (<FH>) {
+ print;
}
+close FH;
print $cgi->end_html();