blob: 65a9736dd0c5b12b1f795eb98d24a7d4070a9046 [file] [log] [blame]
Pascal Rapicault1528b042016-08-18 15:22:59 +02001--- RCPTT testcase ---
2Format-Version: 1.0
3Element-Name: NextPreviousCommentAction
4Element-Type: testcase
5Element-Version: 3.0
6External-Reference:
7Id: _yjV7cGU6EeaCA8nt1hTvvg
8Runtime-Version: 2.1.0.201605312320
Pascal Rapicault56eefbf2017-01-12 21:52:29 -05009Save-Time: 1/13/17 4:16 PM
Pascal Rapicault1528b042016-08-18 15:22:59 +020010Testcase-Type: ecl
11
12------=_.description-216f885c-d591-38ce-8ea2-e4f8cb4d6ffa
13Content-Type: text/plain
14Entry-Name: .description
15
16Test the next comment action
17------=_.description-216f885c-d591-38ce-8ea2-e4f8cb4d6ffa--
18------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac
19Content-Type: text/ecl
20Entry-Name: .content
21
Pascal Rapicault2dfa8a02016-08-18 17:28:18 +020022let [val review [create-review -server $serverURL]] {
Pascal Rapicault1528b042016-08-18 15:22:59 +020023 openCompareEditor $review
24}
25
26// Type a comment and make sure it is colored in yellow
27with [get-editor "Compare.*"] {
Pascal Rapicault56eefbf2017-01-12 21:52:29 -050028 insertComment -on left -text "first comment" -atLine 0 -save
29 insertComment -on left -text "second comment" -atLine 2 -save
Pascal Rapicault1528b042016-08-18 15:22:59 +020030}
31
32with [get-editor "Compare.*"] {
33 get-button "Go To Next Group of Comment Annotation" | click
Pascal Rapicault56eefbf2017-01-12 21:52:29 -050034 get-left-editor | assert-that-selected-text -is ".*first comment.*"
Pascal Rapicault1528b042016-08-18 15:22:59 +020035
36 get-button "Go To Next Group of Comment Annotation" | click
Pascal Rapicault56eefbf2017-01-12 21:52:29 -050037 get-left-editor | assert-that-selected-text -is ".*second comment.*"
Pascal Rapicault1528b042016-08-18 15:22:59 +020038
39 // Check that we circle through the comments in the same editor
40 get-button "Go To Next Group of Comment Annotation" | click
Pascal Rapicault56eefbf2017-01-12 21:52:29 -050041 get-left-editor | assert-that-selected-text -is ".*first comment.*"
Pascal Rapicault1528b042016-08-18 15:22:59 +020042
43 // Now use the previous comment button
44 // Check that we circle through the comments in the same editor
45 get-button "Go To Previous Group of Comment Annotation" | click
Pascal Rapicault56eefbf2017-01-12 21:52:29 -050046 get-left-editor | assert-that-selected-text -is ".*second comment.*"
47}
48
49try {
50 get-editor "Compare.*" | get-button "Swap Left and Right View" | click
51
52 with [get-editor "Compare.*"] {
53 get-right-editor | assert-that-selected-text -is ".*first comment.*"
54
55 get-button "Go To Next Group of Comment Annotation" | click
56 get-right-editor | assert-that-selected-text -is ".*second comment.*"
57
58 // Check that we circle through the comments in the same editor
59 get-button "Go To Next Group of Comment Annotation" | click
60 get-right-editor | assert-that-selected-text -is ".*first comment.*"
61
62 // Now use the previous comment button
63 // Check that we circle through the comments in the same editor
64 get-button "Go To Previous Group of Comment Annotation" | click
65 get-right-editor | assert-that-selected-text -is ".*second comment.*"
66 }
67} -finally {
68 get-editor "Compare.*" | get-button "Swap Left and Right View" | click
Pascal Rapicault1528b042016-08-18 15:22:59 +020069}
70------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac--