blob: fd5d874a97b9e3bd2ad89277492f2171a90603e2 [file] [log] [blame]
--- RCPTT testcase ---
Format-Version: 1.0
Contexts: __ZTV8Au2EeOLiPM97zhEfw,_4zI9AWpgEeCzId1Gnkds9A
Element-Name: Comment 2-lines
Element-Type: testcase
Element-Version: 3.0
External-Reference:
Id: _pLJ3kCbQEeSJvYFSUnsXEQ
Runtime-Version: 2.5.0.201907142359
Save-Time: 7/18/19 2:32 PM
Testcase-Type: ecl
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac
Content-Type: text/ecl
Entry-Name: .content
get-view "Test Explorer" | get-tree | select "MyProject/New Java Class Procs" | double-click
with [get-editor "New Java Class Procs" | get-section Script | get-text-viewer] {
set-caret-pos 27 1
key-type Enter
type-text "// Description of create-java-class procedure"
key-type Enter
type-text "// Second description line"
key-type "M1+END"
type-text "create-java-class"
key-type Enter
}
get-editor "New Java Class Procs" | get-section Script | get-text-viewer | hover-text 36 9 -with Left
with [get-window -from "Information Window" | get-control Browser | get-property text -raw | invoke toLowerCase ] {
invoke contains "procedure <b>create-java-class</b>" | verify-true
invoke contains "description of create-java-class procedure second description line" | verify-true
}
// Adds linebreak
with [get-editor "New Java Class Procs" | get-section Script | get-text-viewer] {
set-caret-pos 28 46
key-type Enter
}
get-editor "New Java Class Procs" | get-section Script | get-text-viewer | hover-text 36 9 -with Left
with [get-window -from "Information Window" | get-control Browser | get-property text -raw | invoke toLowerCase ] {
invoke contains "procedure <b>create-java-class</b>"
invoke contains "description of create-java-class procedure second description line" | verify-false
invoke contains "second description line" | verify-true
}
//"Procedure <b>create-java-class</b>\\n"
// + "<br /> Description of create-java-class procedure Second description line\\n"
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac--