[yast-commit] r48774 - /trunk/packager/src/clients/webpin_package_search.ycp
Author: kmachalkova Date: Wed Jul 2 13:01:43 2008 New Revision: 48774 URL: http://svn.opensuse.org/viewcvs/yast?rev=48774&view=rev Log: Pass selected packages to One-click install Modified: trunk/packager/src/clients/webpin_package_search.ycp Modified: trunk/packager/src/clients/webpin_package_search.ycp URL: http://svn.opensuse.org/viewcvs/yast/trunk/packager/src/clients/webpin_package_search.ycp?rev=48774&r1=48773&r2=48774&view=diff ============================================================================== --- trunk/packager/src/clients/webpin_package_search.ycp (original) +++ trunk/packager/src/clients/webpin_package_search.ycp Wed Jul 2 13:01:43 2008 @@ -69,10 +69,21 @@ index = add( index, it["checksum"]:"", i); i = i+1; }); - y2internal("%1", pkg_items); return pkg_items; } + list <map> FilterOutSelectedPackages() { + list <string> p = ( list <string> ) UI::QueryWidget(`id("results"), `SelectedItems); + list < map > result = []; + + foreach ( string s, p, { + result = add(result, search_results[ index[s]:0 ]:$[]); + }); + + y2internal("%1", result); + return result; + } + symbol ReadDialog() { list <string> steps = [ _("Check Network Configuration"), @@ -171,8 +182,13 @@ any dialog_ret = nil; while (true) { dialog_ret = UI::UserInput(); - if (dialog_ret == `next) - break; + if (dialog_ret == `next){ + WebpinPackageSearch::PrepareOneClickInstallDescription ( + FilterOutSelectedPackages(), + "/tmp/one_click_install" + ); + WFM::CallFunction ("OneClickInstallUI", ["/tmp/one_click_install"]); + } else if (dialog_ret == "search") { string search_expr = SearchExpression(); -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org
participants (1)
-
kmachalkova@svn.opensuse.org