updating vxml for the vxml tbox dump

This commit is contained in:
valeski%netscape.com 2000-07-25 15:29:37 +00:00
Родитель 1454b62393
Коммит ab2250999a
1 изменённых файлов: 2 добавлений и 2 удалений

Просмотреть файл

@ -1000,7 +1000,7 @@ sub do_vxml {
%state_symbols = (success=>'green',busted=>'red',testfailed=>'test failed');
print "<vxml><form><block>\n\n";
print '<vxml><form id="tinderbox"><block>\n\n';
if (is_tree_state_available()) {
print "<audio>$::tree is " .
@ -1014,5 +1014,5 @@ sub do_vxml {
print "<audio>$buildname is $state_symbols{$build{$buildname}} </audio>\n";
}
print "<pause>1000</pause><audio>adios</audio>\n\n";
print '<goto next="_home"/>\n</block></form></vxml>';
print '<disconnect/>\n</block></form></vxml>';
}