X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=opac%2Fopac-userdetails.pl;h=ac10002c5c644f82022c3793cb0019e19ed21a4b;hb=061b38fe8483ee62a226784df1233ae37ad798d2;hp=d31603cdd3bf6497d38601a1040da1153a08f5cd;hpb=fc1342f73df868410e0ab670981f25ba2e1acd74;p=koha_fer diff --git a/opac/opac-userdetails.pl b/opac/opac-userdetails.pl index d31603cdd3..ac10002c5c 100755 --- a/opac/opac-userdetails.pl +++ b/opac/opac-userdetails.pl @@ -13,19 +13,21 @@ # 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 +# You should have received a copy of the GNU General Public License along +# with Koha; if not, write to the Free Software Foundation, Inc., +# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. use strict; +use warnings; + use CGI; use C4::Auth; use C4::Koha; -use C4::Circulation::Circ2; +use C4::Circulation; -use C4::Interface::CGI::Output; -use C4::Date; +use C4::Output; +use C4::Dates qw/format_date/; use C4::Members; my $query = new CGI; @@ -41,7 +43,7 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user( ); # get borrower information .... -my ( $borr, $flags ) = getpatroninformation( undef, $borrowernumber ); +my ( $borr ) = GetMemberDetails( $borrowernumber ); $borr->{'dateenrolled'} = format_date( $borr->{'dateenrolled'} ); $borr->{'dateexpiry'} = format_date( $borr->{'dateexpiry'} );