X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=opac%2Fopac-userdetails.pl;h=ac10002c5c644f82022c3793cb0019e19ed21a4b;hb=9a54047b6d10eb4b553ad29c6130a1e276252fe5;hp=43b77824f4e65204b08dd3c1b64f60248a6df722;hpb=a0b6741c9377a77fee4474f55b2b8cd2e76266d6;p=koha_gimpoz

diff --git a/opac/opac-userdetails.pl b/opac/opac-userdetails.pl
index 43b77824f4..ac10002c5c 100755
--- a/opac/opac-userdetails.pl
+++ b/opac/opac-userdetails.pl
@@ -13,46 +13,44 @@
 # 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;
-require Exporter;
+use warnings;
+
 use CGI;
 
 use C4::Auth;
 use C4::Koha;
-use C4::Circulation::Circ2;
-use C4::Search;
-use HTML::Template;
-use C4::Interface::CGI::Output;
-use C4::Date;
+use C4::Circulation;
+
+use C4::Output;
+use C4::Dates qw/format_date/;
 use C4::Members;
 
 my $query = new CGI;
-my ($template, $borrowernumber, $cookie) 
-    = get_template_and_user({template_name => "opac-userdetails.tmpl",
-			     query => $query,
-			     type => "opac",
-			     authnotrequired => 0,
-			     flagsrequired => {borrow => 1},
-			     debug => 1,
-			     });
+my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
+    {
+        template_name   => "opac-userdetails.tmpl",
+        query           => $query,
+        type            => "opac",
+        authnotrequired => 0,
+        flagsrequired   => { borrow => 1 },
+        debug           => 1,
+    }
+);
 
 # get borrower information ....
-my ($borr, $flags) = getpatroninformation(undef, $borrowernumber);
-
-$borr->{'dateenrolled'} = format_date($borr->{'dateenrolled'});
-$borr->{'expiry'}       = format_date($borr->{'expiry'});
-$borr->{'dateofbirth'}  = format_date($borr->{'dateofbirth'});
-$borr->{'ethnicity'}    = fixEthnicity($borr->{'ethnicity'});
+my ( $borr ) = GetMemberDetails( $borrowernumber );
 
+$borr->{'dateenrolled'} = format_date( $borr->{'dateenrolled'} );
+$borr->{'dateexpiry'}       = format_date( $borr->{'dateexpiry'} );
+$borr->{'dateofbirth'}  = format_date( $borr->{'dateofbirth'} );
+$borr->{'ethnicity'}    = fixEthnicity( $borr->{'ethnicity'} );
 
 $template->param($borr);
-$template->param(LibraryName => C4::Context->preference("LibraryName"),
-);
 
 output_html_with_http_headers $query, $cookie, $template->output;