X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=help.pl;h=fde99d9dda4d1c9a35ac1003f1ae9d4410f7555d;hb=54616c37e25b969907f9da2cf021e7e23ced836c;hp=78f225b94244d6141b08beb5e089b2aa2bf83a90;hpb=e5a24bbbdd0d0e9ff09bfaadfe4c4bb37312e7ec;p=koha.git diff --git a/help.pl b/help.pl index 78f225b942..fde99d9dda 100755 --- a/help.pl +++ b/help.pl @@ -43,8 +43,22 @@ my $query = new CGI; our $refer = $query->param('url'); $refer = $query->referer() if !$refer || $refer eq 'undefined'; my $from = _help_template_file_of_url($refer); +my $htdocs = C4::Context->config('intrahtdocs'); + +# +# checking that the help file exist, otherwise, display nohelp.tt page +# +my ( $theme, $lang ) = C4::Templates::themelanguage( $htdocs, $from, "intranet", $query ); +unless ( -e "$htdocs/$theme/$lang/modules/$from" ) { + $from = "help/nohelp.tt"; + ( $theme, $lang ) = C4::Templates::themelanguage( $htdocs, $from, "intranet", $query ); +} my $template = C4::Templates::gettemplate($from, 'intranet', $query); -$template->param( referer => $refer ); +$template->param( + referer => $refer, + intranetstylesheet => C4::Context->preference("intranetstylesheet"), + intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"), +); output_html_with_http_headers $query, "", $template->output;