From 147c71d1687efece9cd75032586c0689e429aa6d Mon Sep 17 00:00:00 2001 From: Chris Cormack Date: Sat, 1 Feb 2014 14:18:23 +1300 Subject: [PATCH] Bug 11660: remove disused tools/pdfViewer.pl tools/pdfViewer.pl can be used to read artibrary files on the system. It is actually an unused file, so leaving it around serves no purpose and is dangerous. Signed-off-by: Galen Charlton --- tools/pdfViewer.pl | 42 ------------------------------------------ 1 file changed, 42 deletions(-) delete mode 100755 tools/pdfViewer.pl diff --git a/tools/pdfViewer.pl b/tools/pdfViewer.pl deleted file mode 100755 index 8e6a98f..0000000 --- a/tools/pdfViewer.pl +++ /dev/null @@ -1,42 +0,0 @@ -#!/usr/bin/perl - -# script to show a PDF file. -# written 07/04 -# by Veleda Matias - matias_veleda@hotmail.com - Physics Library UNLP Argentina and -# CastaƱeda Sebastian - seba3c@yahoo.com.ar - Physics Library UNLP Argentina and - -# This file is part of Koha. -# -# Koha is free software; you can redistribute it and/or modify it under the -# terms of the GNU General Public License as published by the Free Software -# Foundation; either version 2 of the License, or (at your option) any later -# version. -# -# Koha is distributed in the hope that it will be useful, but WITHOUT ANY -# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR -# A PARTICULAR PURPOSE. See the GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License along with -# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA - - - -use strict; -#use warnings; FIXME - Bug 2505 -use C4::Context; -use CGI; - -# This script take a pdf filename as a parameter and output it to the browser. -my $cgi = new CGI; -my $filename = "barcodes.pdf"; -my $tmpFileName = $cgi->param('tmpFileName'); -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 () { - print; -} -close FH; -print $cgi->end_html(); -- 1.7.10.4