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 / disk.ycp < prev    next >
Encoding:
Text File  |  2006-11-29  |  1.5 KB  |  70 lines
  1. /**
  2.  * File:
  3.  *   disk.ycp
  4.  *
  5.  * Module:
  6.  *   Configuration of disk
  7.  *
  8.  * Summary:
  9.  *   Main file
  10.  *
  11.  * Authors:
  12.  *   Michael Hager <mike@suse.de>
  13.  *
  14.  * $Id: disk.ycp 29327 2006-03-23 13:01:30Z fehr $
  15.  *
  16.  * Wrapper file for inst_disk.ycp
  17.  *
  18.  */
  19.  
  20. {
  21.  
  22. /***
  23.  * <h3>Configuration of the disk</h3>
  24.  */
  25.  
  26.    textdomain "storage";
  27.  
  28.    import "CommandLine";
  29.    import "StorageClients";
  30.    import "Popup";
  31.    import "Storage";
  32.  
  33. define any DiskSequence () {
  34.  
  35.     string msg=_("Only use this program if you are familiar with partitioning hard disks.
  36.  
  37. Never partition disks that may, in any way, be in use
  38. (mounted, swap, etc.) unless you know exactly what you are
  39. doing. Otherwise, the partitioning table will not be forwarded to the
  40. kernel, which would most likely lead to data loss.
  41.  
  42. To continue despite this warning, click Yes.
  43. ");
  44.  
  45.     any ret    = `back;
  46.     // popup headline
  47.     if (Popup::YesNoHeadline(_("Warning"),msg)==true)
  48.     {
  49.     Storage::SwitchUiAutomounter( false );
  50.     ret = WFM::CallFunction("inst_disk", [ true,  true ]);
  51.     Storage::SwitchUiAutomounter( true );
  52.     }
  53.     return ret;
  54. }
  55.  
  56. /* -- the command line description map -------------------------------------- */
  57. map cmdline = $[
  58.     "id"        : "disk",
  59.     // translators: command line help text for disk module
  60.     "help"        : _("Disk partitioner"),
  61.     // custum help text (should replace default one)
  62.     "customhelp"       : _("Command line interface for the partitioner module is not available"),
  63.     "guihandler"    : DiskSequence,
  64. ];
  65.  
  66. CommandLine::Run (cmdline);
  67. return true;
  68.  
  69. }
  70.