From 2551c26f362ede90674c5d067dea7b21a0cbaeab Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Tue, 9 Sep 2014 15:22:35 +0200
Subject: [PATCH] Bug 12852: Some unused stuffs more
These parameters are never used.
GetBookSeller takes a string (bookseller name) in parameter, not an id!
Signed-off-by: Paola Rossi <paola.rossi@cineca.it>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
Signed-off-by: scourret@gmail.com <2>
http://bugs.koha-community.org/show_bug.cgi?id=12404
---
.../prog/en/modules/serials/claims.tt | 3 ---
serials/claims.pl | 6 ------
2 files changed, 0 insertions(+), 9 deletions(-)
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt
index 4cd666e..f20b486 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt
@@ -198,9 +198,6 @@
[% END %]
</select>
<input type="submit" value="OK" />
- [% IF ( phone ) %]Phone: [% phone %][% END %]
- [% IF ( booksellerfax ) %]Fax: [% booksellerfax %][% END %]
- [% IF ( bookselleremail ) %]</p><p><a href="mailto:[% bookselleremail %]">[% bookselleremail %]</a>[% END %]
</fieldset>
</form>
diff --git a/serials/claims.pl b/serials/claims.pl
index dc55fad..bf2ed2f 100755
--- a/serials/claims.pl
+++ b/serials/claims.pl
@@ -84,21 +84,15 @@ if (@serialnums) { # i.e. they have been flagged to generate claims
my $letters = GetLetters({ module => 'claimissues' });
my @missingissues;
-my @supplierinfo;
if ($supplierid) {
@missingissues = GetLateOrMissingIssues($supplierid);
- @supplierinfo=GetBookSeller($supplierid);
}
$template->param(
suploop => $supplierlist,
- phone => $supplierinfo[0]->{phone},
- booksellerfax => $supplierinfo[0]->{booksellerfax},
- bookselleremail => $supplierinfo[0]->{bookselleremail},
missingissues => \@missingissues,
supplierid => $supplierid,
claimletter => $claimletter,
- supplierloop => \@supplierinfo,
branchloop => $branchloop,
csv_profiles => C4::Csv::GetCsvProfiles( "sql" ),
letters => $letters,
--
1.7.2.5