42 |
|
|
43 |
ok(my $list_id = $soap->NewList({ |
ok(my $list_id = $soap->NewList({ |
44 |
list => 'SOAP test', |
list => 'SOAP test', |
45 |
|
from => 'SOAP list', |
46 |
email => 'soap-test@example.com', |
email => 'soap-test@example.com', |
47 |
})->result, "NewList named"); |
})->result, "NewList named"); |
48 |
|
|
49 |
ok(my $list_id2 = $soap->NewList( |
ok(my $list_id2 = $soap->NewList( |
50 |
'SOAP test', |
'SOAP test', |
51 |
|
'SOAP list', |
52 |
'soap-test@example.com', |
'soap-test@example.com', |
53 |
)->result, "NewList positional"); |
)->result, "NewList positional"); |
54 |
|
|