| --- RCPTT testcase --- |
| Format-Version: 1.0 |
| Element-Name: ReviewerModification |
| Element-Type: testcase |
| Element-Version: 3.0 |
| External-Reference: |
| Id: _T3UnwLzWEeamIpS5nD4tmA |
| Runtime-Version: 2.1.0.201605312320 |
| Save-Time: 2/28/17 4:16 PM |
| Testcase-Type: ecl |
| |
| ------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac |
| Content-Type: text/ecl |
| Entry-Name: .content |
| |
| proc "add-reviewer" [val userName] [val editor -input] { |
| with [get-editor] { |
| with [get-tab-folder] { |
| get-tab-item Details | click |
| } |
| with [get-editbox -after [get-label "Reviewer:"]] { |
| set-text $userName |
| key-type Enter |
| wait -ms $defaultWaitTime |
| } |
| } |
| } |
| |
| proc "assert-that-user-is-removable" [val userName] [val editor -input] { |
| with [$editor] { |
| with [get-tab-folder] { |
| get-tab-item Details | click |
| } |
| } |
| $editor | get-editor | get-group Reviewers | get-table | get-items | |
| foreach [val item] { |
| if [$item | get-property "columns[1]" -raw | equals $userName ] { |
| $item | get-property "columns[0]" -raw | equals x | verify-true |
| } |
| } |
| } |
| |
| proc "assert-that-user-is-not-removable" [val userName] [val editor -input] { |
| with [$editor] { |
| with [get-tab-folder] { |
| get-tab-item Details | click |
| } |
| } |
| $editor | get-editor | get-group Reviewers | get-table | get-items | |
| foreach [val item] { |
| if [$item | get-property "columns[1]" -raw | equals $userName ] { |
| $item | get-property "columns[0]" -raw | equals x | verify-false |
| } |
| } |
| } |
| |
| proc "assert-that-first-entry-in-reviewer-table" [val atColumn] [val is] [val in -input] { |
| with [$in] { |
| get-tab-folder | get-tab-item Details | click |
| } |
| with [get-table -index 0] { |
| get-cell -row 0 -column 1 | get-property [concat "columns[" $atColumn "]"] | contains $is | verify-true |
| } |
| } |
| |
| try { |
| let [val review [create-review -server $serverURL]] { |
| runQueryAndOpenEditor $review |
| wait -ms $defaultWaitTime |
| |
| get-editor | add-reviewer "test1 <test1@localhost.com>" |
| get-editor | add-reviewer "test2 <test2@localhost.com>" |
| |
| get-editor | assert-that-user-is-removable "test1" |
| get-editor | assert-that-user-is-removable "test2" |
| |
| get-editor | close |
| |
| //Connect as user test1 |
| add-gerrit-server -serverURL $serverURL -serverName test1 -userName test1 |
| runQueryAndOpenEditor $review -serverName test1 |
| wait -ms $defaultWaitTime |
| |
| get-editor | assert-that-user-is-removable "test1" |
| get-editor | assert-that-user-is-not-removable "test2" |
| |
| // delete reviewer test1 |
| with [get-editor | get-group Reviewers] { |
| get-table | get-cell 0 0 | mouse down -count 1 |
| } |
| get-window "Delete reviewer" | get-button OK | click |
| wait -ms $defaultWaitTime |
| |
| assert-that-first-entry-in-reviewer-table -atColumn 1 -is "test2" -in [get-editor] |
| |
| } |
| } -finally { |
| remove-gerrit-server -serverName test1 |
| } |
| ------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac-- |
