aboutsummaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authordakkar <dakkar@luxion>2005-10-26 09:33:39 +0000
committerdakkar <dakkar@luxion>2005-10-26 09:33:39 +0000
commit57f05eac1683d0b56e54ac9fdb117120169be9aa (patch)
treefac769453ca960db5590a6ab1aa13439c1d1acda /t
parentaggiornamento delle relazioni tra collezioni, e relazioni circolari (diff)
downloadWebCoso-57f05eac1683d0b56e54ac9fdb117120169be9aa.tar.gz
WebCoso-57f05eac1683d0b56e54ac9fdb117120169be9aa.tar.bz2
WebCoso-57f05eac1683d0b56e54ac9fdb117120169be9aa.zip
creato contenitore collezioni, migliorata gestione lingue
git-svn-id: svn://luxion/repos/WebCoso/trunk@18 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 't')
-rw-r--r--t/01-config.t53
1 files changed, 48 insertions, 5 deletions
diff --git a/t/01-config.t b/t/01-config.t
index 78000a3..e8b8ee6 100644
--- a/t/01-config.t
+++ b/t/01-config.t
@@ -83,7 +83,9 @@ ok(WebCoso::Config->read_scalar($conf_file,"$thisdir/config-in-test"),
is(scalar WebCoso::Config->get_all_resources(),0,'nessuna risorsa');
-my @collections=WebCoso::Config->get_all_collections();
+my $collections=WebCoso::Config->get_collections();
+isa_ok($collections,'WebCoso::Config::Collections');
+my @collections=$collections->get_all_collections();
is(scalar @collections,1,'una collezione');
is_deeply(
@@ -92,8 +94,16 @@ is_deeply(
'multilingua');
is_deeply(
[$collections[0]->axis('language')],
- [''],
+ [],
'ma nessuna definita');
+is_deeply(
+ [$collections->axes()],
+ ['language'],
+ 'multilingua, insieme');
+is_deeply(
+ [$collections->axis('language')],
+ [],
+ 'ma nessuna definita, insieme');
my $props=$collections[0]->properties(language=>'');
isa_ok($props,'HASH');
is_deeply(
@@ -113,6 +123,14 @@ is_deeply(
[$collections[0]->get_resources()],
[],
'no resources');
+is_deeply(
+ [$collections->get_root_collections()],
+ [@collections],
+ 'una radice');
+is_deeply(
+ [$collections->get_leaf_collections()],
+ [@collections],
+ 'una foglia');
}
WebCoso::Config->clear();
@@ -126,7 +144,8 @@ EOF
ok(WebCoso::Config->read_scalar($conf_file,"$thisdir/config-in-test"),
'eseguita la configurazione');
-my @collections=WebCoso::Config->get_all_collections();
+my $collections=WebCoso::Config->get_collections();
+my @collections=$collections->get_all_collections();
is(scalar @collections,2,'due collezioni');
# qui sto assumendo che le collezioni vengano registrate in ordine di
@@ -136,6 +155,10 @@ is_deeply(
[sort $collections[0]->axis('language')],
['en', 'it'],
'due lingue');
+is_deeply(
+ [sort $collections->axis('language')],
+ ['en', 'it'],
+ 'due lingue');
is(
$collections[0]->properties(language=>'en')->{name},
'coll1-en',
@@ -144,6 +167,10 @@ is(
$collections[0]->properties(language=>'it')->{name},
'coll1',
'nome it');
+is(
+ $collections[1]->properties(language=>'it')->{name},
+ 'coll2',
+ 'nome default');
is_deeply(
[$collections[0]->get_parents()],
@@ -161,7 +188,14 @@ is_deeply(
[$collections[1]->get_children()],
[$collections[0]],
'c1 figlio di c2');
-
+is_deeply(
+ [$collections->get_root_collections()],
+ [$collections[1]],
+ 'una radice');
+is_deeply(
+ [$collections->get_leaf_collections()],
+ [$collections[0]],
+ 'una foglia');
}
WebCoso::Config->clear();
@@ -176,7 +210,8 @@ EOF
ok(WebCoso::Config->read_scalar($conf_file,"$thisdir/config-in-test"),
'eseguita la configurazione (no strict)');
-my @collections=WebCoso::Config->get_all_collections();
+my $collections=WebCoso::Config->get_collections();
+my @collections=$collections->get_all_collections();
is(scalar @collections,2,'due collezioni');
is_deeply(
@@ -195,4 +230,12 @@ is_deeply(
[$collections[1]->get_parents()],
[$collections[0]],
'c1 padre di c2');
+is_deeply(
+ [$collections->get_root_collections()],
+ [],
+ 'nessuna radice');
+is_deeply(
+ [$collections->get_leaf_collections()],
+ [],
+ 'nessuna foglia');
}