diff options
| author | Siri Hansen <[email protected]> | 2011-07-01 10:32:45 +0200 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2011-07-01 10:32:45 +0200 |
| commit | e909414b27ab8ea36c4f4fec4779a244434c91f4 (patch) | |
| tree | 7259625c72a8a98b9e53b706837f113c4e633079 /lib | |
| parent | 2eb1a6d294908478b39e65856bda4f5dcea4a4e2 (diff) | |
| parent | 2695e672634dfc94ff91fb5f58dd8695e9805e2c (diff) | |
| download | otp-e909414b27ab8ea36c4f4fec4779a244434c91f4.tar.gz otp-e909414b27ab8ea36c4f4fec4779a244434c91f4.tar.bz2 otp-e909414b27ab8ea36c4f4fec4779a244434c91f4.zip | |
Merge branch 'siri/reltool/empty-radiobox/OTP-9384' into dev
* siri/reltool/empty-radiobox/OTP-9384:
Do not add an empty radio box on the releases tab for the start_clean release
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/reltool/src/reltool_sys_win.erl | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/lib/reltool/src/reltool_sys_win.erl b/lib/reltool/src/reltool_sys_win.erl index a893a8d8e9..8b0f64eb45 100644 --- a/lib/reltool/src/reltool_sys_win.erl +++ b/lib/reltool/src/reltool_sys_win.erl @@ -674,15 +674,15 @@ create_main_release_page(#state{book = Book} = S) -> add_release_page(Book, #rel{name = RelName, rel_apps = RelApps}) -> Panel = wxPanel:new(Book, []), Sizer = wxBoxSizer:new(?wxHORIZONTAL), - RelBox = wxRadioBox:new(Panel, - ?wxID_ANY, - "Applications included in the release " ++ RelName, - ?wxDefaultPosition, - ?wxDefaultSize, - [atom_to_list(RA#rel_app.name) || RA <- RelApps], - []), - %% wxRadioBox:setSelection(RelBox, 2), % mandatory - wxEvtHandler:connect(RelBox, command_radiobox_selected, + AppNames = [kernel, stdlib | + [RA#rel_app.name || RA <- RelApps] -- [kernel, stdlib]], + RelBox = wxListBox:new( + Panel,?wxID_ANY, + [{pos,?wxDefaultPosition}, + {size,?wxDefaultSize}, + {choices,[[atom_to_list(AppName)] || AppName <- AppNames]}, + {style,?wxLB_EXTENDED}]), + wxEvtHandler:connect(RelBox, command_listbox_selected, [{userData, {config_rel_cond, RelName}}]), RelToolTip = "Choose which applications that shall " "be included in the release resource file.", |