Bug 12918: fix failing test case

A bug in a test case causes test case failure. It also required a
database, so I'm moving it out of the way.

Test plan:
1) prove -v t/db_dependent/Templates.t
   -- bombs!
2) apply patch
3) prove -v t/db_dependent/Templates.t
   -- works!

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
Good catch Robin, it didn't fail in Perl 5.18 so didn't notice the mistake.

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>

diff --git a/t/Templates.t b/t/Templates.t
deleted file mode 100755 (executable)
index f50297b..0000000
--- a/t/Templates.t
+++ /dev/null
@@ -1,49 +0,0 @@
-#!/usr/bin/perl
-
-# 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>.
-
-use Modern::Perl;
-
-use CGI;
-
-use Test::More tests => 5;
-use Test::Deep;
-
-BEGIN {
-    use_ok( 'C4::Templates' );
-    can_ok( 'C4::Templates',
-         qw/ GetColumnDefs
-             getlanguagecookie
-             setlanguagecookie
-             themelanguage
-             gettemplate
-             _get_template_file
-             param
-             output /);
-}
-
-my $query   = CGI->new();
-my $columns = C4::Templates::GetColumnDefs( $query );
-
-is( ref( $columns ) eq 'HASH', 1, 'GetColumnDefs returns a hashref' );
-# get the tables names, sorted
-my @keys = sort keys $columns;
-is( scalar @keys, 5, "GetColumnDefs correctly returns the 5 tables defined in columns.def" );
-my @tables = ( 'biblio', 'biblioitems', 'borrowers', 'items', 'statistics');
-cmp_deeply( \@keys, \@tables, "GetColumnDefs returns the expected tables");
-
-
-1;

diff --git a/t/db_dependent/Templates.t b/t/db_dependent/Templates.t
new file mode 100755 (executable)
index 0000000..ade6f1d
--- /dev/null
+++ b/t/db_dependent/Templates.t
@@ -0,0 +1,49 @@
+#!/usr/bin/perl
+
+# 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>.
+
+use Modern::Perl;
+
+use CGI;
+
+use Test::More tests => 5;
+use Test::Deep;
+
+BEGIN {
+    use_ok( 'C4::Templates' );
+    can_ok( 'C4::Templates',
+         qw/ GetColumnDefs
+             getlanguagecookie
+             setlanguagecookie
+             themelanguage
+             gettemplate
+             _get_template_file
+             param
+             output /);
+}
+
+my $query   = CGI->new();
+my $columns = C4::Templates::GetColumnDefs( $query );
+
+is( ref( $columns ) eq 'HASH', 1, 'GetColumnDefs returns a hashref' );
+# get the tables names, sorted
+my @keys = sort keys %$columns;
+is( scalar @keys, 5, "GetColumnDefs correctly returns the 5 tables defined in columns.def" );
+my @tables = ( 'biblio', 'biblioitems', 'borrowers', 'items', 'statistics');
+cmp_deeply( \@keys, \@tables, "GetColumnDefs returns the expected tables");
+
+
+1;