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>

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 (file)
--- 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 (executable)
--- 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,