From fdc224e1025529726007e345990c682073920aa8 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 20 Jan 2016 14:59:48 +0000 Subject: [PATCH] Bug 15631: Koha::Cities - remove getzipnamecity C4::Members::getzipnamecity was not used and can be remove safely. Test plan: git grep getzipnamecity should not return any result. Signed-off-by: Kyle M Hall Signed-off-by: Brendan Gallagher brendan@bywatersolutions.com --- C4/Members.pm | 20 -------------------- 1 file changed, 20 deletions(-) diff --git a/C4/Members.pm b/C4/Members.pm index 9ee02b8d00..f758501c63 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -67,7 +67,6 @@ BEGIN { &GetPendingIssues &GetAllIssues - &getzipnamecity &getidcity &GetFirstValidEmailAddress @@ -1363,25 +1362,6 @@ sub get_cardnumber_length { return ( $min, $max ); } -=head2 getzipnamecity (OUEST-PROVENCE) - -take all info from table city for the fields city and zip -check for the name and the zip code of the city selected - -=cut - -sub getzipnamecity { - my ($cityid) = @_; - my $dbh = C4::Context->dbh; - my $sth = - $dbh->prepare( - "select city_name,city_state,city_zipcode,city_country from cities where cityid=? "); - $sth->execute($cityid); - my @data = $sth->fetchrow; - return $data[0], $data[1], $data[2], $data[3]; -} - - =head2 getdcity (OUEST-PROVENCE) recover cityid with city_name condition -- 2.39.5