View | Details | Raw Unified | Return to bug 20020
Collapse All | Expand All

(-)a/xt/author/podcorrectness.t (-3 / +1 lines)
Lines 1-7 Link Here
1
#!/usr/bin/env perl
1
#!/usr/bin/env perl
2
use strict;
2
use Modern::Perl;
3
use warnings;
4
5
=head2 podcorrectness.t
3
=head2 podcorrectness.t
6
4
7
This test file checks all perl modules in the C4 directory for POD
5
This test file checks all perl modules in the C4 directory for POD
(-)a/xt/author/show-template-structure.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
21
23
=head1 NAME
22
=head1 NAME
24
23
(-)a/xt/author/translatable-templates.t (-3 / +1 lines)
Lines 15-23 Link Here
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
17
18
use strict;
18
use Modern::Perl;
19
use warnings;
20
21
=head2 translate-templates.t
19
=head2 translate-templates.t
22
20
23
This test verifies that all staff and OPAC template
21
This test verifies that all staff and OPAC template
(-)a/xt/author/valid-templates.t (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
21
23
=head1 NAME
22
=head1 NAME
24
23
(-)a/xt/find-license-problems (-2 / +1 lines)
Lines 24-31 Link Here
24
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
25
25
26
26
27
use strict;
27
use Modern::Perl;
28
use warnings;
29
28
30
use File::Find;
29
use File::Find;
31
30
(-)a/xt/fix-old-fsf-address (-2 / +1 lines)
Lines 27-34 Link Here
27
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
27
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
28
28
29
29
30
use strict;
30
use Modern::Perl;
31
use warnings;
32
31
33
use File::Basename;
32
use File::Basename;
34
use File::Copy;
33
use File::Copy;
(-)a/xt/single_quotes.t (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use warnings;
20
use Modern::Perl;
21
use strict;
22
use Test::More tests => 1;
21
use Test::More tests => 1;
23
use File::Find;
22
use File::Find;
24
23
(-)a/xt/verify-debian-docbook.t (-4 / +1 lines)
Lines 20-28 Link Here
20
# This runs 'xmllint' (part of libxml2-utils) over each xml file that
20
# This runs 'xmllint' (part of libxml2-utils) over each xml file that
21
# generates the koha-common man pages and ensures they're correct.
21
# generates the koha-common man pages and ensures they're correct.
22
22
23
use strict;
23
use Modern::Perl;
24
use warnings;
25
26
use Test::More qw(no_plan);
24
use Test::More qw(no_plan);
27
25
28
my $doc_dir = 'debian/docs';
26
my $doc_dir = 'debian/docs';
29
- 

Return to bug 20020