Author: M0...@gm...
Date: Tue Aug 12 08:43:02 2008
New Revision: 115
Modified:
branches/iVL/MdlConfLilo.module
branches/iVL/MdlLiloOsList.module
Log:
- LILO config now creates a text boot option for the recently installed
vector entry.
Modified: branches/iVL/MdlConfLilo.module
==============================================================================
--- branches/iVL/MdlConfLilo.module (original)
+++ branches/iVL/MdlConfLilo.module Tue Aug 12 08:43:02 2008
@@ -95,26 +95,27 @@
"read-only"
'Message(sSection)
-
- FOR EACH cb IN MdlLiloOsList.bVlCliOption
- IF cb.Tag = sMatchTag THEN
- IF cb.Value = TRUE THEN
- sCliSection = Replace(sSection, "append = \"" &
sEntryApnd & "\"", "append = \"2 splash=silent\"")
- sCliSection = Replace(sCliSection, "label = " &
sEntryLbl, label = sEntryLbl & "-tui")
+
+ IF sMatchTag = ClsPartSel.sRoot THEN
+ IF MdlLiloOsList.bVlCliOption = TRUE THEN
+ sCliSection = Replace(sSection, "append = \""
& sEntryApnd & "\"", "append = \"2 splash=silent\"")
+ sCliSection = Replace(sCliSection, "label = "
& sEntryLbl, "label = " & sEntryLbl & "-tui")
+ END IF
+ ELSE
+ sCliSection = ""
END IF
- END IF
- NEXT
-
-sFile = sFile & gb.NewLine & sSection & gb.NewLine
-
+
END IF
+ sFile = sFile & gb.NewLine & sSection & gb.NewLine & gb.NewLine
& sCliSection & gb.NewLine
END IF
-
+
NEXT
'Message(FrmLilo.TabStrip1.text)
END WITH
+
NEXT
-Message.Delete(sFile)
+'sFile = sFile & gb.NewLine & sSection & gb.NewLine & gb.NewLine &
sCliSection & gb.NewLine
+Message(sfile)
Modified: branches/iVL/MdlLiloOsList.module
==============================================================================
--- branches/iVL/MdlLiloOsList.module (original)
+++ branches/iVL/MdlLiloOsList.module Tue Aug 12 08:43:02 2008
@@ -239,7 +239,7 @@
' Add an option to boot the recently installed OS to CLI mode
- ClsPartSel.sRoot = "/dev/hda1"
+ ClsPartSel.sRoot = "/dev/hda1" ' for testing only
IF sLiloDesc LIKE "Vector" THEN
IF arrLinux[i] = ClsPartSel.sRoot THEN
cbInclude = NEW CheckBox(FrmLilo.TabStrip1)
AS "VlCliOption"
|
