diff options
| author | dakkar <dakkar@luxion> | 2006-02-04 16:40:52 +0000 |
|---|---|---|
| committer | dakkar <dakkar@luxion> | 2006-02-04 16:40:52 +0000 |
| commit | 1289e62a8d1a1a5b94b0b502e2aacdb2cb6d501d (patch) | |
| tree | 3b966f66e4b15fbc3e4650757ac8df2b0e5a4da8 /t | |
| parent | passa tutti i test. mancano i controlli per evitare la sovrapopoplazione degl... (diff) | |
| download | WebCoso-1289e62a8d1a1a5b94b0b502e2aacdb2cb6d501d.tar.gz WebCoso-1289e62a8d1a1a5b94b0b502e2aacdb2cb6d501d.tar.bz2 WebCoso-1289e62a8d1a1a5b94b0b502e2aacdb2cb6d501d.zip | |
integrate le nuove resources al posto delle vecchie config::resources
git-svn-id: svn://luxion/repos/WebCoso/trunk@150 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 't')
| -rw-r--r-- | t/01-config.t | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/t/01-config.t b/t/01-config.t index 5a3e6b7..f5dd870 100644 --- a/t/01-config.t +++ b/t/01-config.t @@ -20,16 +20,17 @@ ok(WebCoso::Config->read_scalar($conf_file,"$thisdir/config-in-test"), my @resources=WebCoso::Config->get_all_resources(); is(scalar @resources,1,'una risorsa definta'); -isa_ok($resources[0],'WebCoso::Config::Resource'); +isa_ok($resources[0],'WebCoso::Resource'); is_deeply( [$resources[0]->get_axes()], ['filename'], 'un solo asse'); is_deeply( - [$resources[0]->get_axis_value('filename')], + [$resources[0]->get_axis_values('filename')], ["$thisdir/src/file1.rest.txt"], 'filename'); -is($resources[0]->get_datastream(filename=>"$thisdir/src/file1.rest.txt"), +my $content=do {my $fh=$resources[0]->get_property({filename=>"$thisdir/src/file1.rest.txt"},'datastream');local $/;<$fh>}; +is($content, <<'EOF',''); Titolo ====== @@ -37,10 +38,6 @@ Titolo testo EOF is_deeply( - [$resources[0]->get_properties()], - [], - 'no properties'); -is_deeply( [$resources[0]->get_collections()], [], 'no collections'); @@ -92,7 +89,7 @@ is_deeply( ['language'], 'multilingua'); is_deeply( - [$collections[0]->get_axis_value('language')], + [$collections[0]->get_axis_values('language')], [], 'ma nessuna definita'); is_deeply( @@ -100,7 +97,7 @@ is_deeply( ['language'], 'multilingua, insieme'); is_deeply( - [$collections->get_axis_value('language')], + [$collections->get_axis_values('language')], [], 'ma nessuna definita, insieme'); my $props=$collections[0]->get_properties(language=>''); @@ -151,11 +148,11 @@ is(scalar @collections,2,'due collezioni'); # definizione. Forse non sarà sempre vero is_deeply( - [sort $collections[0]->get_axis_value('language')], + [sort $collections[0]->get_axis_values('language')], ['en', 'it'], 'due lingue'); is_deeply( - [sort $collections->get_axis_value('language')], + [sort $collections->get_axis_values('language')], ['en', 'it'], 'due lingue'); is( |