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 / autoinst_scripts2_finish.ycp < prev    next >
Text File  |  2006-11-29  |  1KB  |  62 lines
  1. /**
  2.  * File:
  3.  *  autoinst_scripts2_finish.ycp
  4.  *
  5.  * Module:
  6.  *  Step of base installation finish
  7.  *
  8.  * Authors:
  9.  *  Jiri Srain <jsrain@suse.cz>
  10.  *
  11.  * $Id: autoinst_scripts2_finish.ycp 27936 2006-02-13 20:01:14Z olh $
  12.  *
  13.  */
  14.  
  15. {
  16.  
  17. textdomain "autoinst";
  18.  
  19. import "AutoinstScripts";
  20.  
  21.  
  22. any ret = nil;
  23. string func = "";
  24. map param = $[];
  25.  
  26. /* Check arguments */
  27. if(size(WFM::Args()) > 0 && is(WFM::Args(0), string)) {
  28.     func = (string)WFM::Args(0);
  29.     if(size(WFM::Args()) > 1 && is(WFM::Args(1), map))
  30.     param = (map)WFM::Args(1);
  31. }
  32.  
  33. y2milestone ("starting autoinst_scripts2_finish");
  34. y2debug("func=%1", func);
  35. y2debug("param=%1", param);
  36.  
  37. if (func == "Info")
  38. {
  39.     return (any)$[
  40.     "steps" : 1,
  41.     // progress step title
  42.     "title" : _("Executing autoinstall scripts in the installation environment..."),
  43.         "when" : [ `autoinst ],
  44.     ];
  45. }
  46. else if (func == "Write")
  47. {
  48.     AutoinstScripts::Write("chroot-scripts", true);
  49. }
  50. else
  51. {
  52.     y2error ("unknown function: %1", func);
  53.     ret = nil;
  54. }
  55.  
  56. y2debug("ret=%1", ret);
  57. y2milestone("autoinst_scripts2_finish finished");
  58. return ret;
  59.  
  60.  
  61. } /* EOF */
  62.