From 0e2787e3790e42f31a4b949f585676abe49efb73 Mon Sep 17 00:00:00 2001 From: Owen Leonard Date: Tue, 15 Mar 2016 10:02:22 -0400 Subject: [PATCH] Bug 16077 - Remove unused script and template card-print MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit I can find no reference to card-print.pl being used in Koha. This patch deletes it and its associated template. To test, apply the patch and search for references to "card-print" in Koha. There should be none. Signed-off-by: Marc Véron Signed-off-by: Jonathan Druart This script does not work, it fails with 'Undefined subroutine get_label_output_formats'. This subroutine was in C4::Labels::Lib which has been removed by 2433a91 (Feb 8 2010): Removing depricated file from the C4::Labels module. Signed-off-by: Brendan Gallagher brendan@bywatersolutions.com --- .../prog/en/modules/patroncards/card-print.tt | 165 ------------------ patroncards/card-print.pl | 131 -------------- 2 files changed, 296 deletions(-) delete mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/card-print.tt delete mode 100755 patroncards/card-print.pl diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/card-print.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/card-print.tt deleted file mode 100644 index a2b9ef9544..0000000000 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/patroncards/card-print.tt +++ /dev/null @@ -1,165 +0,0 @@ - [% INCLUDE 'doc-head-open.inc' %] - Koha › Tools › Patron Card Creator › Patron card printing/exporting - [% INCLUDE 'doc-head-close.inc' %] - - - - - -
-
- [% IF ( batches ) %] -
-
-
- Click on the following link(s) to download the exported batch(es). -
-
-
- - [% FOREACH batche IN batches %] - - [% IF ( batche.label_ids ) %] - - - - - [% ELSIF ( batche.item_numbers ) %] - - - - - [% ELSE %] - - - - - [% END %] - - [% END %] -
- [% batche.label_count %] Single cards - -

- label_single_[% batche.label_count %].pdf -

- 		-

- label_single_[% batche.label_count %].csv -

- 		-

- label_single_[% batche.label_count %].xml -

- 		- [% batche.label_count %] Single Cards - -

- label_single_[% batche.label_count %].pdf -

- 		-

- label_single_[% batche.label_count %].csv -

- 		-

- label_single_[% batche.label_count %].xml -

- 		- Card batch number [% batche.batch_id %] - -

- label_batch_[% batche.batch_id %].pdf -

- 		-

- label_batch_[% batche.batch_id %].csv -

- 		-

- label_batch_[% batche.batch_id %].xml -

-
-
-
-
- -
-
-
- [% ELSE %] -
-
- [% IF ( label_ids ) %] - Exporting [% label_count %] cards(s). - [% ELSIF ( item_numbers ) %] - Exporting [% item_count %] cards(s). - [% ELSE %] - [% multi_batch_count %] batch(es) to export. - [% END %] -
-
-
- - - [% FOREACH batch_id IN batch_ids %] - - [% END %] - [% FOREACH label_id IN label_ids %] - - [% END %] - [% FOREACH item_number IN item_numbers %] - - [% END %] -
- - - - - - - - - - - - - -
- - - -
- - - -
- - - -
-
-
-
- - -
-
-
- [% END %] -
- [% INCLUDE 'intranet-bottom.inc' %] diff --git a/patroncards/card-print.pl b/patroncards/card-print.pl deleted file mode 100755 index 6f2970a72c..0000000000 --- a/patroncards/card-print.pl +++ /dev/null @@ -1,131 +0,0 @@ -#!/usr/bin/perl -# -# Copyright 2009 Foundations Bible College. -# -# 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 3 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, see . - -use strict; -use warnings; - -use CGI qw ( -utf8 ); -use Data::Dumper; - -use C4::Auth qw(get_template_and_user); -use C4::Output qw(output_html_with_http_headers); -use C4::Creators; -use C4::Labels; - -my $cgi = new CGI; -my ( $template, $loggedinuser, $cookie ) = get_template_and_user( - { - template_name => "patroncards/card-print.tt", - query => $cgi, - type => "intranet", - authnotrequired => 0, - flagsrequired => { catalogue => 1 }, - debug => 1, - } -); - -my $op = $cgi->param('op') || 'none'; -my @label_ids = $cgi->param('label_id') if $cgi->param('label_id'); # this will handle individual label printing -my @batch_ids = $cgi->param('batch_id') if $cgi->param('batch_id'); -my $layout_id = $cgi->param('layout_id') || undef; -my $template_id = $cgi->param('template_id') || undef; -my $start_label = $cgi->param('start_label') || 1; -my @item_numbers = $cgi->param('item_number') if $cgi->param('item_number'); -my $output_format = $cgi->param('output_format') || 'pdf'; -my $referer = $cgi->param('referer') || undef; - -my $layouts = undef; -my $templates = undef; -my $label_output_formats = undef; -my @batches = (); -my $multi_batch_count = scalar(@batch_ids); -my $label_count = scalar(@label_ids); -my $item_count = scalar(@item_numbers); - -if ($op eq 'export') { - if (@label_ids) { - my $label_id_param = '&label_id='; - $label_id_param .= join ('&label_id=',@label_ids); - push (@batches, {create_script => ($output_format eq 'pdf' ? 'label-create-pdf.pl' : 'label-create-csv.pl'), - batch_id => $batch_ids[0], - template_id => $template_id, - layout_id => $layout_id, - start_label => $start_label, - label_ids => $label_id_param, - label_count => scalar(@label_ids), - }); - $template->param( - batches => \@batches, - referer => $referer, - ); - } - elsif (@item_numbers) { - my $item_number_param = '&item_number='; - $item_number_param .= join ('&item_number=',@item_numbers); - push (@batches, {create_script => ($output_format eq 'pdf' ? 'label-create-pdf.pl' : 'label-create-csv.pl'), - template_id => $template_id, - layout_id => $layout_id, - start_label => $start_label, - item_numbers => $item_number_param, - label_count => scalar(@item_numbers), - }); - $template->param( - batches => \@batches, - referer => $referer, - ); - } - elsif (@batch_ids) { - foreach my $batch_id (@batch_ids) { - push (@batches, {create_script => ($output_format eq 'pdf' ? 'label-create-pdf.pl' : 'label-create-csv.pl'), - batch_id => $batch_id, - template_id => $template_id, - layout_id => $layout_id, - start_label => $start_label, - }); - } - $template->param( - batches => \@batches, - referer => $referer, - ); - } -} -elsif ($op eq 'none') { - # setup select menus for selecting layout and template for this run... - $referer = $ENV{'HTTP_REFERER'}; - $referer =~ s/^.*?:\/\/.*?(\/.*)$/$1/m; - @batch_ids = grep{$_ = {batch_id => $_}} @batch_ids; - @label_ids = grep{$_ = {label_id => $_}} @label_ids; - @item_numbers = grep{$_ = {item_number => $_}} @item_numbers; - $templates = get_all_templates(field_list => 'template_id, template_code'); - $layouts = get_all_layouts(field_list => 'layout_id, layout_name'); - $label_output_formats = get_label_output_formats(); - $template->param( - batch_ids => \@batch_ids, - label_ids => \@label_ids, - item_numbers => \@item_numbers, - templates => $templates, - layouts => $layouts, - label_output_formats => $label_output_formats, - multi_batch_count => $multi_batch_count, - label_count => $label_count, - item_count => $item_count, - referer => $referer, - ); -} -output_html_with_http_headers $cgi, $cookie, $template->output; -- 2.39.5