From fae4460bb266aefe9cec8441e06f481a620132d2 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Wed, 9 Oct 2002 15:45:25 +0000
Subject: [PATCH] bugfix : uses gettemplate and not picktemplate

---
 userpage.pl | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/userpage.pl b/userpage.pl
index 119ffe20ab..00766b6c8c 100755
--- a/userpage.pl
+++ b/userpage.pl
@@ -25,16 +25,11 @@ use C4::Output;  # contains picktemplate
 use CGI;
 use C4::Search;
 use C4::Auth;
- 
+
 my $query=new CGI;
 my ($loggedinuser, $cookie, $sessionID) = checkauth($query, 1);
 
-my $includes = C4::Context->config('includes') ||
-	"/usr/local/www/hdl/htdocs/includes";
-my $templatebase="user/userpage.tmpl";
-my $theme=picktemplate($includes, $templatebase);
-
-my $template = HTML::Template->new(filename => "$includes/templates/$theme/$templatebase", die_on_bad_params => 0, path => [$includes]);
+my $template = gettemplate("user/userpage.tmpl",0);
 
 $template->param(loggedinuser => $loggedinuser);
 
-- 
2.39.5