|
Lines 27-34
use CGI::Session;
Link Here
|
| 27 |
require Exporter; |
27 |
require Exporter; |
| 28 |
use C4::Context; |
28 |
use C4::Context; |
| 29 |
use C4::Templates; # to get the template |
29 |
use C4::Templates; # to get the template |
| 30 |
use C4::Members; |
|
|
| 31 |
use C4::Koha; |
| 32 |
use C4::Branch; # GetBranches |
30 |
use C4::Branch; # GetBranches |
| 33 |
use C4::VirtualShelves; |
31 |
use C4::VirtualShelves; |
| 34 |
use POSIX qw/strftime/; |
32 |
use POSIX qw/strftime/; |
|
Lines 188-195
sub get_template_and_user {
Link Here
|
| 188 |
} |
186 |
} |
| 189 |
|
187 |
|
| 190 |
$borrowernumber = getborrowernumber($user) if defined($user); |
188 |
$borrowernumber = getborrowernumber($user) if defined($user); |
| 191 |
|
189 |
require C4::Members; |
| 192 |
my ( $borr ) = GetMemberDetails( $borrowernumber ); |
190 |
my ( $borr ) = C4::Members::GetMemberDetails( $borrowernumber ); |
| 193 |
my @bordat; |
191 |
my @bordat; |
| 194 |
$bordat[0] = $borr; |
192 |
$bordat[0] = $borr; |
| 195 |
$template->param( "USER_INFO" => \@bordat ); |
193 |
$template->param( "USER_INFO" => \@bordat ); |
| 196 |
- |
|
|