3 # Copyright 2011 Catalyst IT
5 # This file is part of Koha.
7 # Koha is free software; you can redistribute it and/or modify it under the
8 # terms of the GNU General Public License as published by the Free Software
9 # Foundation; either version 2 of the License, or (at your option) any later
12 # Koha is distributed in the hope that it will be useful, but WITHOUT ANY
13 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
14 # A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16 # You should have received a copy of the GNU General Public License along
17 # with Koha; if not, write to the Free Software Foundation, Inc.,
18 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
29 This test checks all staff and OPAC templates and includes for syntax errors
41 print "Testing intranet prog templates\n";
43 'koha-tmpl/intranet-tmpl/prog/en/modules',
44 'koha-tmpl/intranet-tmpl/prog/en/includes'
47 print "Testing opac bootstrap templates\n";
49 'koha-tmpl/opac-tmpl/bootstrap/en/modules',
50 'koha-tmpl/opac-tmpl/bootstrap/en/includes'
53 print "Testing opac prog templates\n";
55 'koha-tmpl/opac-tmpl/prog/en/modules',
56 'koha-tmpl/opac-tmpl/prog/en/includes'
59 # TODO add test of opac ccsr templates
63 sub run_template_test {
64 my $template_path = shift;
65 my $include_path = shift;
66 my $template_dir = File::Spec->rel2abs($template_path);
67 my $include_dir = File::Spec->rel2abs($include_path);
68 my $template_test = create_template_test($include_dir);
69 find( { wanted => $template_test, no_chdir => 1 },
70 $template_dir, $include_dir );
73 sub create_template_test {
76 my $tt = Template->new(
79 INCLUDE_PATH => $includes,
80 PLUGIN_BASE => 'Koha::Template::Plugin',
85 if ( !ok( $tt->process( $_, $vars, \$output ), $_ ) ) {
93 Koha Developement Team <http://koha-community.org>
95 Chris Cormack <chrisc@catalyst.net.nz>