home *** CD-ROM | disk | FTP | other *** search
- /**
- * Module: inst_suseconfig.ycp
- *
- * Authors: Andreas Schwab (schwab@suse.de)
- *
- * Purpose: -Showing the "Finishing the installation" frame
- * -Running "SuSEconfig"
- * -Running "init" to reread inittag, which has been
- * changed by SuSEconfig.
- * -Showing the loginname which can be used.
- *
- * user_settings: used: loginname
- *
- * scr: -
- *
- * $Id: inst_suseconfig.ycp,v 1.16 2000/03/10 16:40:15 kkaempf Exp $
- */
- {
- term contents = `Label("");
- any dlg = UI(`SetWizardContents(_("Finishing the installation"), contents,
- _("\
- <p>
- Normally, this will take a couple of minutes. Please wait...
- </p>
- <p>
- <tt>SuSEconfig</tt> has to initialize your SuSE Linux system. Depending on
- the CPU and the amount of memory, this procedure can take some time.
- </p>
- <br>
- "),
- Args(0), Args(1)));
-
- // --------------------------------------------------------------
- // Put config of installed kernel into kernel sources
-
- Mkdir("/usr/src/linux");
- Shell("cp /boot/vmlinuz.config /usr/src/linux/.config");
- Mkdir("/usr/src/linux/include");
- Mkdir("/usr/src/linux/include/linux");
- Shell("cp /boot/vmlinuz.*.h /usr/src/linux/include/linux");
-
- y2log(.milestone, "inst_suseconfig", 1, "Starting SuSEconfig");
-
- Shell("/sbin/SuSEconfig >/dev/tty4 2>&1");
-
- y2log(.milestone, "inst_suseconfig", 2, "SuSEconfig done");
-
- // Tell init to reread inittab, which has been changed by SuSEconfig.
-
- Shell("/sbin/init q");
-
- return `auto;
- }
-