IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Jun 29, 2005, 4:35:06 PM (21 years ago)
Author:
jhoblitt
Message:

rename PS::IPP::IData -> Nebulous

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Nebulous-Server/t/03_server_create_object.t

    r2872 r4440  
    33# Copryight (C) 2004-2005  Joshua Hoblitt
    44#
    5 # $Id: 03_server_create_object.t,v 1.3 2005-01-03 23:55:29 jhoblitt Exp $
     5# $Id: 03_server_create_object.t,v 1.4 2005-06-30 02:35:06 jhoblitt Exp $
    66
    77use strict;
     
    1212use lib qw( ./t ./lib );
    1313
    14 use PS::IPP::IData::Server;
    15 use PS::IPP::IData::Util qw( :standard );
    16 use Test::IData;
     14use Nebulous::Server;
     15use Nebulous::Util qw( :standard );
     16use Test::Nebulous;
    1717
    18 my $idata = "PS::IPP::IData::Server";
     18my $neb = "Nebulous::Server";
    1919
    20 $idata->setup(
     20$neb->setup(
    2121    "DBI:mysql:database=test:host=localhost",
    2222    "test",
     
    2424);
    2525
    26 Test::IData->setup;
     26Test::Nebulous->setup;
    2727
    2828{
    2929    # key
    30     my $uri = $idata->create_object( "foo" );
     30    my $uri = $neb->create_object( "foo" );
    3131
    3232    ok( -e _get_file_path( $uri ), "file exists" );
     
    3434}
    3535
    36 Test::IData->setup;
     36Test::Nebulous->setup;
    3737
    3838{
    3939    # key, class
    40     my $uri = $idata->create_object( "foo", 0 );
     40    my $uri = $neb->create_object( "foo", 0 );
    4141
    4242    ok( -e _get_file_path( $uri ), "file exists" );
     
    4444}
    4545
    46 Test::IData->setup;
     46Test::Nebulous->setup;
    4747
    4848{
    4949    # key, class, volume
    50     my $uri = $idata->create_object( "foo", 0, "node01" );
     50    my $uri = $neb->create_object( "foo", 0, "node01" );
    5151
    5252    ok( -e _get_file_path( $uri ), "file exists" );
     
    5454}
    5555
    56 Test::IData->setup;
     56Test::Nebulous->setup;
    5757
    5858{
    5959    # key, class, volume, comment
    60     my $uri = $idata->create_object( "foo", 0, "node01", "this is foo" );
     60    my $uri = $neb->create_object( "foo", 0, "node01", "this is foo" );
    6161
    6262    ok( -e _get_file_path( $uri ), "file exists" );
     
    6464}
    6565
    66 Test::IData->setup;
     66Test::Nebulous->setup;
    6767
    6868eval {
    69     $idata->create_object( "foo" );
    70     $idata->create_object( "foo" );
     69    $neb->create_object( "foo" );
     70    $neb->create_object( "foo" );
    7171};
    7272like( $@, qr/Duplicate entry/, "object already exists" );
    7373
    74 Test::IData->setup;
     74Test::Nebulous->setup;
    7575
    7676eval {
    77     $idata->create_object();
     77    $neb->create_object();
    7878};
    7979like( $@, qr/2 - 4 were expected/, "no params" );
    8080
    81 Test::IData->setup;
     81Test::Nebulous->setup;
    8282
    8383eval {
    84     $idata->create_object( 1, 2, 3, 4, 5 );
     84    $neb->create_object( 1, 2, 3, 4, 5 );
    8585};
    8686like( $@, qr/2 - 4 were expected/, "too many params" );
    8787
    88 Test::IData->cleanup;
     88Test::Nebulous->cleanup;
Note: See TracChangeset for help on using the changeset viewer.