--- Q7 testcase ---
Format-Version: 1.0
Q7-vendor: www.xored.com/q7
Contexts: _qy4DwH_5EeK9FdRInrmHdQ,_DyPzwH_sEeKzh4ksbY4F-Q,_IIAJAIriEeKFictDEDHejA
Element-Name: QS-1206_Excessive space while entering new element's name
Element-Type: testcase
Element-Version: 3.0
External-Reference: 
Id: _mQbAMIYjEeKI6L5Mk5N07A
Save-Time: 8/5/13 2:20 PM
Testcase-Type: ecl

------=_.description-216f885c-d591-38ce-8ea2-e4f8cb4d6ffa
Content-Type: text/plain
Entry-Name: .description

While entering the new element's name: if you mistype the name of the class and then correct it, the Control Panel still records it with quotations marks and an excessive space:

get-menu "File/New/Class" | click
with [get-window "New Java Class"] { get-editbox -after [get-label "Package:"] | set-text test get-editbox -after [get-label "Name:"] | set-text "test " <<----- }
------=_.description-216f885c-d591-38ce-8ea2-e4f8cb4d6ffa--
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac
Content-Type: text/ecl
Entry-Name: .content

get-view "Q7 Explorer" | get-tree | select [get-item Q7Project | get-item JavaProjectWithClass -index 1] | double-click
get-editor JavaProjectWithClass | get-button Record | click

get-aut "Papyrus" | eval{

get-view "Package Explorer" | get-tree | select JavaProject | get-menu "New/Class" | click

}

wait 100
//exec-process -command "\"C:\\Program Files\\Sikuli X\\Sikuli-IDE.exe\"" -args "-r \"C:\\Users\\bamboo\\Documents\\SikuliTests\\MistypeClassName.sikuli\" -s" -ignoreExitCode
//exec-process -command "\"C:\\Program Files\\Sikuli X\\Sikuli-IDE.exe\"" -args [substitute-variables "-r \"${resource_loc:sikuli/MistypeClassName.sikuli}\" -s"] -ignoreExitCode
exec-process "\"C:\\Program Files\\Sikuli X\\Sikuli-IDE.exe\"""-r" [substitute-variables "\"${resource_loc:sikuli/MistypeClassName.sikuli}\""]"-s"-ignoreExitCode


get-window "Q7 Control Panel.*" | get-button Stop | click


get-window "Q7 Control Panel - JavaProjectWithClass (Q7Project) - Papyrus" | get-text-viewer | get-property text 
    | equals "get-view \"Package Explorer\" | get-tree | select JavaProject\n"
    + "with [get-window \"New Java Class\"] {\n"
    + "    get-editbox -after [get-label \"Name:\"] | set-text test\n"
    + "    get-button Finish | click\n"
    + "}" | verify-true
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac--