Revision 83c97773
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 7 Jahren hinzugefügt
| t/file/filesystem.t | ||
|---|---|---|
| 84 | 84 |
} or do {
|
| 85 | 85 |
$result=$@; |
| 86 | 86 |
}; |
| 87 |
ok($result eq "No object type at SL/Controller/File.pm line 327.\n","correct error 'No object type'"); |
|
| 87 |
$result = substr($result,0,14); |
|
| 88 |
print $result."\n"; |
|
| 89 |
ok($result eq "No object type","correct error 'No object type'"); |
|
| 88 | 90 |
|
| 89 | 91 |
$::form->{object_type} ='sales_order';
|
| 90 | 92 |
$::form->{file_type} ='';
|
| ... | ... | |
| 96 | 98 |
} or do {
|
| 97 | 99 |
$result=$@; |
| 98 | 100 |
}; |
| 99 |
ok($result eq "No file type at SL/Controller/File.pm line 328.\n","correct error 'No file type'"); |
|
| 101 |
$result = substr($result,0,12); |
|
| 102 |
print $result."\n"; |
|
| 103 |
ok($result eq "No file type","correct error 'No file type'"); |
|
| 100 | 104 |
|
| 101 | 105 |
clear_up(); |
| 102 | 106 |
done_testing; |
Auch abrufbar als: Unified diff
t/file/filesystem.t robuster