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_x11.ycp < prev    next >
Encoding:
Text File  |  2006-11-29  |  1.1 KB  |  43 lines
  1. /**************
  2. FILE          : inst_x11.ycp
  3. ***************
  4. PROJECT       : YaST2
  5.               :
  6. AUTHOR        : Marcus Sch├ñfer <ms@suse.de>
  7.               :
  8. BELONGS TO    : YaST2
  9.               : (X11 integration part using SaX2/ISaX)
  10.               :
  11. DESCRIPTION   : The installation workflow will call inst_x11
  12.               : This module will check if we have X11 installed
  13.               : and import the main X11 module (x11.ycp)
  14.               :
  15. STATUS        : Development
  16.  *
  17.  * $Id: inst_x11.ycp 22839 2005-03-29 12:24:31Z jsrain $
  18.  */
  19.  
  20. {
  21.     import "X11Version";
  22.     import "Mode";
  23.     import "Installation";
  24.     import "Arch";
  25.     import "GetInstArgs";
  26.  
  27.     boolean next = GetInstArgs::enable_next();
  28.     boolean back = GetInstArgs::enable_back();
  29.  
  30.     //==========================================
  31.     // Check if X11 is installed
  32.     //------------------------------------------
  33.     if (
  34.         X11Version::have_x11() &&
  35.         Installation::x11_setup_needed () && Arch::x11_setup_needed ()
  36.     ) {
  37.         any ret = WFM::CallFunction ("x11", [back, next]);
  38.         return ret;
  39.     } else {
  40.         return `next;
  41.     }
  42. }
  43.