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