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_autoimage.ycp < prev    next >
Encoding:
Text File  |  2006-11-29  |  1.2 KB  |  65 lines
  1. /**
  2.  * File:    clients/inst_autoimage.ycp
  3.  * Package:    Auto-installation
  4.  * Author:      Anas Nashif <nashif@suse.de>
  5.  * Summary:    Imaging
  6.  *
  7.  * $Id: inst_autoimage.ycp 33269 2006-10-09 08:22:24Z ug $
  8.  */
  9.  
  10. {
  11.  
  12. textdomain "autoinst";
  13.  
  14. import "Installation";
  15. import "Progress";
  16. import "Report";
  17. import "AutoinstImage";
  18. import "AutoinstSoftware";
  19.  
  20. if (!AutoinstSoftware::imaging)
  21.     return `auto;
  22.  
  23.  
  24.  
  25. string help_text = _("<p>
  26. Please wait while the image is retrieved.</p>
  27. ");
  28. list<string> progress_stages =
  29. [
  30.  _("Retrieve Image File"),
  31.   _("Install image file")
  32.  ];
  33.  
  34.  list<string> progress_descriptions =
  35.  [
  36.   _("Retrieving image file..."),
  37.   _("Installing image file...")
  38.   ];
  39.  
  40. Progress::New(
  41.           _("Installing image into system..."),
  42.           "",     // progress_title
  43.           size( progress_stages ),    // progress bar length
  44.           progress_stages,
  45.           progress_descriptions,
  46.           help_text );
  47.  
  48. Progress::NextStage();
  49.  
  50. //if (!AutoinstImage::Get(AutoinstSoftware::ft_module, Installation::destdir ))
  51. //{
  52. //    Report::Error(_("Error while retrieving image."));
  53. //    return `abort;
  54. //}
  55.  
  56. AutoinstImage::getScript();
  57. AutoinstImage::runScript();
  58.  
  59. Progress::Finish();
  60.  
  61. return `next;
  62.  
  63.  
  64. }
  65.