Changeset 80


Ignore:
Timestamp:
11/30/05 14:01:58 (19 years ago)
Author:
thauvin
Message:
  • add test
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/soft/ObsData/t/O-02.t

    • Property cvs2svn:cvs-rev changed from 1.14 to 1.15
    r77 r80  
    11# $Id$ 
    22 
    3 use Test::More tests => 28; 
     3use Test::More tests => 29; 
    44use File::Temp qw(tempdir); 
    55use POSIX qw(strftime); 
     
    1414ok($o->loglevel(0) eq "DEBUG", "Can get loglevel"); 
    1515ok($o->loglevel(10) eq "?????", "Can get wrong loglevel"); 
     16ok($o->loging(0, "FOO%s", "FOO") eq "FOOFOO", "loging properly return the message"); 
    1617 
    1718ok($o->load, "can load repository"); 
Note: See TracChangeset for help on using the changeset viewer.