home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / boot / i386 / root / usr / share / YaST2 / clients / inst_add-on.ycp < prev    next >
Encoding:
Text File  |  2006-11-29  |  902 b   |  47 lines
  1. /**
  2.  * File:    clients/inst_add-on.ycp
  3.  * Package:    yast2-installation
  4.  * Summary:    Select add-on products for installation
  5.  * Authors:    Jiri Srain <jsrain@suse.de>
  6.  *
  7.  */
  8.  
  9. {
  10. textdomain "installation";
  11.  
  12. import "AddOnProduct";
  13. import "GetInstArgs";
  14. import "Packages";
  15. import "PackageCallbacksInit";
  16. import "Popup";
  17. import "ProductControl";
  18. import "Report";
  19. import "Wizard";
  20.  
  21. include "installation/add-on-workflow.ycp";
  22.  
  23. map argmap = GetInstArgs::argmap();
  24.  
  25. Packages::SelectProduct ();
  26.  
  27. PackageCallbacksInit::SetMediaCallbacks();
  28.  
  29. symbol ret = RunAddOnMainDialog (GetInstArgs::enable_back(), GetInstArgs::enable_next());
  30.  
  31. if (ret == `next)
  32. {
  33.     foreach (map<string,any> prod, AddOnProduct::add_on_products, {
  34.     AddOnProduct::Integrate (prod["media"]:0);
  35.     });
  36.     ret = ProductControl::RunFrom (
  37.     ProductControl::CurrentStep () + 1,
  38.     true);
  39.     if (ret == `next)
  40.     ret = `finish;
  41. }
  42.  
  43. return ret;
  44.  
  45. /* EOF */
  46. }
  47.