projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 7298: (follow-up) fix uninitialized variable warning
[koha.git]
/
errors
/
401.pl
diff --git
a/errors/401.pl
b/errors/401.pl
index
0982c2f
..
02884f3
100755
(executable)
--- a/
errors/401.pl
+++ b/
errors/401.pl
@@
-12,24
+12,23
@@
# 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
# 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
-
+# Koha; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use strict;
use strict;
-#use warnings; FIXME - Bug 2505
+use warnings;
use CGI;
use C4::Auth;
use C4::Output;
use C4::Context;
use CGI;
use C4::Auth;
use C4::Output;
use C4::Context;
-my $query =
new CGI
;
+my $query =
CGI->new
;
my $admin = C4::Context->preference('KohaAdminEmailAddress');
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{
my $admin = C4::Context->preference('KohaAdminEmailAddress');
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{
- template_name =>
"errors/401.tmpl"
,
+ template_name =>
'errors/401.tmpl'
,
query => $query,
query => $query,
- type =>
"intranet"
,
+ type =>
'intranet'
,
authnotrequired => 1,
debug => 1,
}
authnotrequired => 1,
debug => 1,
}