CPAN::Groonga

Test metadata_isnt.
    @nodes = $wiki->list_recent_changes(
        last_n_changes => 1,
        metadata_isnt  => { username => "Kake" }
    );
    is( scalar @nodes, 1, "metadata_isnt, too" );
    

isnt  => { edit_type => "Minor tidying" }
    );
    @nodenames = map { $_->{name} } @nodes;
    print "# Found nodes: " . join(" ", @nodenames) . "\n";
    is( scalar @nodes, 1,
       "metadata_isnt

anges => 1,
               metadata_isnt  => { arthropod => "millipede" }
           );
    };
    is( $@, "",
  "list_recent_changes doesn't die when metadata_isnt doesn't omit anything" );

    ####

ata_is" );
    @nodes = $wiki->list_recent_changes(
        days           => 7,
        metadata_isnt  => { username  => "Earle",
                            edit_type => "Minor tidying" }
    );
   

deeply( \@names, [ "Test 2", "Test 3" ],
               "can supply multiple criteria to metadata_isnt" );

    @nodes = $wiki->list_recent_changes(
        days           => 7,
        metadata_was  

ta_isnt  => { edit_type => "Minor tidying" },
    );
    @names = sort map { $_->{name} } @nodes;
    is_deeply( \@names, [ "Test 3" ],
               "can supply both metadata_is and metadata_isnt" )

ch_nodes('home');
        };
        is( $@, "", "search_nodes doesn't throw warning" );

        isnt( scalar keys %results, 0, "...and can find a single word" );
        is( scalar keys %results, 2,

 node names as keys" );

        %results = $wiki->search_nodes('expert defenestration');
        isnt( scalar keys %results, 0,
              "...and can find two words on an AND search" );

        

des with only one term." );

        %results = $wiki->search_nodes('wombat home', 'OR');
        isnt( scalar keys %results, 0,
              "...and the OR search seems to work" );

        SKIP: {

                  metadata_isnt => { two => 3 } );
    %nodehash = map { $_->{name} => 1 } @nodes;
    ok($nodehash{"Two Node"},
       "...node does show up in metadata_isnt search" );
    @nodes = $