gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 5751 : Follow up patch, removing unused variable and fixing copyright

This commit is contained in:
Chris Cormack 2011-02-14 12:15:14 +13:00
parent 3be7a6d458
commit f6be5ef20f
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
members/members-home.pl
View File

@ -1,5 +1,6 @@
#!/usr/bin/perl
# Parts Copyright Biblibre 2010
# This file is part of Koha.
#
# Koha is free software; you can redistribute it and/or modify it under the
@ -27,7 +28,6 @@ use C4::Branch;
use C4::Category;
my $query = new CGI;
my $quicksearch = $query->param('quicksearch');
my $branch = $query->param('branchcode');
my $template_name;
@ -39,7 +39,6 @@ my ($template, $loggedinuser, $cookie)
flagsrequired => {borrowers => 1},
debug => 1,
});
}
my $branches = GetBranches;
my @branchloop;
@ -59,16 +58,21 @@ my $branchloop = (defined $branch?GetBranchesLoop($branch):GetBranchesLoop());
if(scalar(@$branchloop) < 1){
$no_add = 1;
$template->param(no_branches => 1);
} else {
}
else {
$template->param(branchloop=>\@$branchloop);
}
@categories=C4::Category->all;
if(scalar(@categories) < 1){ $no_categories = 1; }
if(scalar(@categories) < 1){
$no_categories = 1;
}
if($no_categories && C4::Context->preference("AddPatronLists")=~/code/){
$no_add = 1;
$template->param(no_categories => 1);
} else {
}
else {
$template->param(categories=>\@categories);
}