From ce8dd6fc2441ef37a22323d9d8c867197408be30 Mon Sep 17 00:00:00 2001 From: Devendra Gera Date: Fri, 14 Mar 2008 10:07:59 +0530 Subject: [PATCH] Added test for metadata search. Signed-off-by: Devendra Gera --- t/03-metadata.t | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/t/03-metadata.t b/t/03-metadata.t index 207d51c..63c8be6 100644 --- a/t/03-metadata.t +++ b/t/03-metadata.t @@ -5,17 +5,17 @@ if( !defined $ENV{LTC_TRACKER_RUNNING} ) { plan skip_all => "LTC_TRACKER_RUNNING not set"; } else { - plan tests => 9; + plan tests => 12; } my $tracker = LibTracker::Client->get_instance(); SKIP: { - skip "LTC_TEST_PATH not set", 2 unless defined $ENV{LTC_TEST_PATH}; + skip "LTC_TEST_PATH not set", 5 unless defined $ENV{LTC_TEST_PATH}; my $path = $ENV{LTC_TEST_PATH}; my $field = ENV{LTC_META_FIELD} || "File:Other"; - my $test_value = "XXX_LTCTEST_XXX"; + my $test_value = "XXX_LTCMETA_XXX"; # try to set metadata my $metadata = { $field => $test_value }; @@ -25,6 +25,12 @@ SKIP: { # get metadata my $metadata = $tracker->get_metadata(SERVICE_FILES, $path, [ $field ]); is( $metadata->{$field}, $test_value, "metadata" ); + + # search metadata + my $results = $tracker->search_metadata(SERVICE_FILES, $field, $test_value, 0, 100); + ok( $results, "search results" ); + ok( ref $results =~ /ARRAY/, "search results return type" ); + ok( contains( $results, $file ), "test file in results" ); } # register metadata type -- 2.11.4.GIT