Bug 18746: Add license and remove diag

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Jonathan Druart 2017-06-09 10:21:33 -03:00
parent 89d36585bb
commit fcec2c71b4
1 changed files with 21 additions and 9 deletions

View File

@ -1,18 +1,30 @@
#!/usr/bin/perl
use strict;
use warnings;
# This file is part of Koha.
#
# Koha is free software; you can redistribute it and/or modify it under the
# terms of the GNU General Public License as published by the Free Software
# Foundation; either version 3 of the License, or (at your option) any later
# version.
#
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
# 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, see <http://www.gnu.org/licenses>.
#This test demonstrates why Koha uses the CSV parser and configration
#it does. Specifically, the test is for Unicode compliance in text
#parsing and data. This test requires other modules that Koha doesn't
#actually use, in order to compare. Therefore, running this test is not
#necessary to test your Koha installation.
use Modern::Perl;
use Test::More tests => 32;
use Test::Warn;
BEGIN {
diag q{
This test demonstrates why Koha uses the CSV parser and configration
it does. Specifically, the test is for Unicode compliance in text
parsing and data. This test requires other modules that Koha doesn't
actually use, in order to compare. Therefore, running this test is not
necessary to test your Koha installation.
};
use FindBin;
use lib $FindBin::Bin;
use_ok('Text::CSV');