Commit 530a1835 authored by Per Cederqvist's avatar Per Cederqvist
Browse files

(David committed this to the wrong branch):

(kom_delete_text): New function. Use to delete a text from the test suite.
parent 3766abf3
......@@ -256,6 +256,15 @@ proc kom_delete_conf { conf_no { result "" } { testname "" } } {
simple_expect $result $testname
}
proc kom_delete_text { text_no { result "" } { testname "" } } {
global ref_no;
kom_next_call
send "$ref_no 29 $text_no\n"
set result [cres $result "=$ref_no"]
simple_expect $result $testname
}
proc kom_ping_server { } {
global ref_no
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment