|
Last change
on this file since 23 was
23,
checked in by thauvin, 19 years ago
|
- check obs really exists when getting value
|
-
Property cvs2svn:cvs-rev set to
1.2
-
Property svn:keywords set to
Author Date Id Revision
-
Property svn:mime-type set to
text/x-troff
|
|
File size:
271 bytes
|
| Line | |
|---|
| 1 | # $Id$ |
|---|
| 2 | |
|---|
| 3 | use Test::More tests => 4; |
|---|
| 4 | |
|---|
| 5 | use_ok('ObsData'); |
|---|
| 6 | |
|---|
| 7 | can_ok('ObsData', qw(list_obs list_datadir get_datadir getvalue is_obs)); |
|---|
| 8 | |
|---|
| 9 | ok(ObsData->new('testdata/obsdata-conftest'), "Can create object"); |
|---|
| 10 | ok(!ObsData->new('testdata/wrongfile'), "Return an error on bad file"); |
|---|
Note: See
TracBrowser
for help on using the repository browser.
