Adding KohaAdminEmailAddress to template

diff --git a/koha-tmpl/errors/400.pl b/koha-tmpl/errors/400.pl
index 2cb78d9..94a721c 100755 (executable)
--- a/koha-tmpl/errors/400.pl
+++ b/koha-tmpl/errors/400.pl
@@ -9,6 +9,7 @@ use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
+my $admin = C4::Context->preference('KohaAdminEmailAddress');
 my ($template, $loggedinuser, $cookie)
 = get_template_and_user({template_name => "errors/400.tmpl",
                                query => $query,
@@ -17,4 +18,5 @@ my ($template, $loggedinuser, $cookie)
                                flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
+$template->param( admin => $admin);
 output_html_with_http_headers $query, $cookie, $template->output;

diff --git a/koha-tmpl/errors/401.pl b/koha-tmpl/errors/401.pl
index 9e0763d..7d0acb9 100755 (executable)
--- a/koha-tmpl/errors/401.pl
+++ b/koha-tmpl/errors/401.pl
@@ -9,6 +9,7 @@ use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
+my $admin = C4::Context->preference('KohaAdminEmailAddress');
 my ($template, $loggedinuser, $cookie)
 = get_template_and_user({template_name => "errors/401.tmpl",
                                query => $query,
@@ -17,4 +18,5 @@ my ($template, $loggedinuser, $cookie)
                                flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
+$template->param( admin => $admin);                            
 output_html_with_http_headers $query, $cookie, $template->output;

diff --git a/koha-tmpl/errors/402.pl b/koha-tmpl/errors/402.pl
index 229dc1b..c4dc56b 100755 (executable)
--- a/koha-tmpl/errors/402.pl
+++ b/koha-tmpl/errors/402.pl
@@ -9,6 +9,7 @@ use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
+my $admin = C4::Context->preference('KohaAdminEmailAddress');
 my ($template, $loggedinuser, $cookie)
 = get_template_and_user({template_name => "errors/402.tmpl",
                                query => $query,
@@ -17,4 +18,5 @@ my ($template, $loggedinuser, $cookie)
                                flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
+$template->param( admin => $admin);                            
 output_html_with_http_headers $query, $cookie, $template->output;

diff --git a/koha-tmpl/errors/403.pl b/koha-tmpl/errors/403.pl
index 587cb72..e73be2e 100755 (executable)
--- a/koha-tmpl/errors/403.pl
+++ b/koha-tmpl/errors/403.pl
@@ -9,6 +9,7 @@ use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
+my $admin = C4::Context->preference('KohaAdminEmailAddress');
 my ($template, $loggedinuser, $cookie)
 = get_template_and_user({template_name => "errors/403.tmpl",
                                query => $query,
@@ -17,4 +18,5 @@ my ($template, $loggedinuser, $cookie)
                                flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
+$template->param( admin => $admin);                            
 output_html_with_http_headers $query, $cookie, $template->output;

diff --git a/koha-tmpl/errors/404.pl b/koha-tmpl/errors/404.pl
index 1b16bf8..f750dac 100755 (executable)
--- a/koha-tmpl/errors/404.pl
+++ b/koha-tmpl/errors/404.pl
@@ -9,6 +9,7 @@ use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
+my $admin = C4::Context->preference('KohaAdminEmailAddress');
 my ($template, $loggedinuser, $cookie)
 = get_template_and_user({template_name => "errors/404.tmpl",
                                query => $query,
@@ -17,4 +18,5 @@ my ($template, $loggedinuser, $cookie)
                                flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
+$template->param( admin => $admin);                            
 output_html_with_http_headers $query, $cookie, $template->output;

diff --git a/koha-tmpl/errors/500.pl b/koha-tmpl/errors/500.pl
index bdf0cc3..1681feb 100755 (executable)
--- a/koha-tmpl/errors/500.pl
+++ b/koha-tmpl/errors/500.pl
@@ -9,6 +9,7 @@ use C4::Context;
 use HTML::Template;
 
 my $query = new CGI;
+my $admin = C4::Context->preference('KohaAdminEmailAddress');
 my ($template, $loggedinuser, $cookie)
 = get_template_and_user({template_name => "errors/500.tmpl",
                                query => $query,
@@ -17,4 +18,5 @@ my ($template, $loggedinuser, $cookie)
                                flagsrequired => {catalogue => 1},
                                debug => 1,
                                });
+$template->param( admin => $admin);
 output_html_with_http_headers $query, $cookie, $template->output;