From 599b3b599900e11223571042c43794ea6042400c Mon Sep 17 00:00:00 2001 From: Andrew Moore Date: Mon, 7 Jul 2008 12:54:47 -0500 Subject: [PATCH] bug 2295 [2/4]: moving icondirectories.t from t to xt the icondirectories.t test depends on the database, so it needed to be moved. But, it's really more of an author test since it's testinging the correct structure of our distribution, so I'm moving it to xt/author. Signed-off-by: Galen Charlton Signed-off-by: Joshua Ferraro --- {t => xt/author}/icondirectories.t | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) rename {t => xt/author}/icondirectories.t (74%) diff --git a/t/icondirectories.t b/xt/author/icondirectories.t similarity index 74% rename from t/icondirectories.t rename to xt/author/icondirectories.t index 6408d894d2..d6b0177389 100644 --- a/t/icondirectories.t +++ b/xt/author/icondirectories.t @@ -18,14 +18,15 @@ use warnings; use lib qw( .. ); -use C4::Koha; - use Data::Dumper; use File::Find; -use Test::More tests => 1; +use Test::More tests => 3; + +my $opac_icon_directory = 'koha-tmpl/opac-tmpl/prog/itemtypeimg'; +my $staff_icon_directory = 'koha-tmpl/intranet-tmpl/prog/img/itemtypeimg'; -my $opac_icon_directory = getitemtypeimagedir('opac'); -my $staff_icon_directory = getitemtypeimagedir('intranet'); +ok( -d $opac_icon_directory, "opac_icon_directory: $opac_icon_directory exists" ); +ok( -d $staff_icon_directory, "staff_icon_directory: $staff_icon_directory exists" ); my $opac_icons; # hashref of filenames to sizes sub opac_wanted { -- 2.39.2