projects
/
koha_fer
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 6649 Allow help screens editing
[koha_fer]
/
errors
/
400.pl
diff --git
a/errors/400.pl
b/errors/400.pl
index
b04b7fd
..
122a1fe
100755
(executable)
--- a/
errors/400.pl
+++ b/
errors/400.pl
@@
-12,23
+12,24
@@
# 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;
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/400.tmpl"
,
+ template_name =>
'errors/400.tmpl'
,
query => $query,
query => $query,
- type =>
"intranet"
,
+ type =>
'intranet'
,
authnotrequired => 1,
debug => 1,
}
authnotrequired => 1,
debug => 1,
}