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 / vm_autoyast_proposal.ycp < prev    next >
Text File  |  2006-11-29  |  1KB  |  71 lines
  1. /**
  2.  * Module:    vm_autoyast_proposal.ycp
  3.  *
  4.  * Authors:    Ladislav Slezak <lslezak@suse.cz>
  5.  *
  6.  * Purpose:     Proposal for AutoYaST profile
  7.  *
  8.  * $Id: vm_autoyast_proposal.ycp 31352 2006-06-06 23:53:13Z mgfritch $
  9.  *
  10.  */
  11. {
  12.     textdomain "vm";
  13.  
  14.     import "VM";
  15.     import "VM_Common";
  16.     import "HTML";
  17.     import "Mode";
  18.  
  19.     import "Report";
  20.     Report::DisplayErrors(true, 0);
  21.  
  22.     string func = (string) WFM::Args (0);
  23.     map param = (map) WFM::Args (1);
  24.     map ret = $[];
  25.  
  26.     if ( func == "MakeProposal" )
  27.     {
  28.     boolean force_reset      = param["force_reset"     ]:false;
  29.     boolean language_changed = param["language_changed"]:false;
  30.  
  31.     if (force_reset)
  32.     {
  33.         VM::ResetAutoYastProfile();
  34.     }
  35.  
  36.     ret = $[ "preformatted_proposal" : VM::GetAutoYastProposal() ];
  37.  
  38.     map warn = VM::GetAutoYastProposalWarning();
  39.  
  40.     if (warn != nil && size(warn) > 0)
  41.     {
  42.         ret = union(ret, warn);
  43.     }
  44.     }
  45.     else if ( func == "AskUser" )
  46.     {
  47.     boolean has_next = param["has_next"]:false;
  48.  
  49.     symbol result = (symbol) WFM::CallFunction ("inst_vm_autoyast",
  50.                             [true, has_next]);
  51.  
  52.     ret = $[ "workflow_sequence" : result ];
  53.     }
  54.     else if ( func == "Description" )
  55.     {
  56.     if (VM::GetVirtualizationType() == "para" && VM_Common::proposal_type == "install") {
  57.         ret = (Mode::config()) ? $[] :
  58.             $[
  59.             // this is a heading
  60.             "rich_text_title"    : _("AutoYaST"),
  61.             // this is a menu entry
  62.             "menu_title"        : _("AutoYaST"),
  63.             "id"            : "vm_autoyast"
  64.             ];
  65.     }
  66.     else return $[];
  67.     }
  68.  
  69.     return ret;
  70. }
  71.