|
From: <cod...@go...> - 2008-10-17 13:55:55
|
Author: M0...@gm...
Date: Fri Oct 17 06:54:46 2008
New Revision: 235
Modified:
branches/iVL/.lang/FMain.pot
branches/iVL/FMain.class
branches/iVL/FrmNetConf.class
branches/iVL/MdlConfLilo.module
branches/iVL/MdlNetConf.module
Log:
Debugging lilo setup window
Modified: branches/iVL/.lang/FMain.pot
==============================================================================
--- branches/iVL/.lang/FMain.pot (original)
+++ branches/iVL/.lang/FMain.pot Fri Oct 17 06:54:46 2008
@@ -14,59 +14,63 @@
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
-#: FMain.class:226
+#: FMain.class:205
msgid "Please wait while setup attampts to run the partitioning utility"
msgstr ""
-#: FMain.class:228
+#: FMain.class:207
msgid "Please wait while setup analyses your current partition setup."
msgstr ""
-#: FMain.class:228
+#: FMain.class:207
msgid "This may take a while ..."
msgstr ""
-#: FMain.class:242
+#: FMain.class:221
msgid "You must select a \"/\" partition. This is the target where the
system will install to"
msgstr ""
-#: FMain.class:298
+#: FMain.class:277
msgid "Skipping lilo setup"
msgstr ""
-#: FMain.class:327
+#: FMain.class:307
msgid "has been installed on your computer."
msgstr ""
-#: FMain.class:327
+#: FMain.class:307
+msgid "Additional system configuration will take place after you reboot
your system.Part of this process must be done in text mode."
+msgstr ""
+
+#: FMain.class:307
msgid "Would you like to reboot your computer now?"
msgstr ""
-#: FMain.class:327
+#: FMain.class:307
msgid "Yes"
msgstr ""
-#: FMain.class:327
+#: FMain.class:307
msgid "No"
msgstr ""
-#: FMain.class:421
+#: FMain.class:401
msgid "Process Overview"
msgstr ""
-#: FMain.class:441
+#: FMain.class:421
msgid "Next"
msgstr ""
-#: FMain.class:447
+#: FMain.class:427
msgid "Back"
msgstr ""
-#: FMain.class:453
+#: FMain.class:433
msgid "Exit Installation"
msgstr ""
-#: FMain.class:469
+#: FMain.class:449
msgid "Button1"
msgstr ""
Modified: branches/iVL/FMain.class
==============================================================================
--- branches/iVL/FMain.class (original)
+++ branches/iVL/FMain.class Fri Oct 17 06:54:46 2008
@@ -182,28 +182,7 @@
SELECT CASE FrmCurr.Name ' very nice navigation algoritm
- ' CASE "FrmLangSel"
- ' sLang = MdlLangSel.ID_LANG(Trim(FrmLangSel.lbLangSel.text))
- ' System.Language = sLang
- ' FMain.Close
- ' 'System.Language = sLang
- ' ''MdlCore.frmInit = FrmSelISO
- ' 'WAIT
- ' MdlCore.main
-
-
-
- ' now need to restart the application to make sure it takes effect
-
- 'SHELL Application.Args[0] & Space(1) & sLang
- 'QUIT
-
-
- ' SHELL "LC_ALL=" & sLang & Space(1) & "LANG=" & sLang & " ./" &
Application.Args[0] & Space(1) & sLang ' this will set the LANG environment
to what the user selects and restart the application.
- 'SHELL "LC_ALL=" & Application.Args[1] & Space(1) & "LANG=" &
Application.Args[1] & Space(1) & "./" & Application.Args[0] & Space(1) &
Trim(FrmLangSel.listbox1.text)
-' IF ERROR THEN Message(Error.Text & gb.NewLine & Error.where)
- 'QUIT
-
+
CASE "FrmSelISO"
sDev = Right(FrmSelISO.lstInstallableImg.Text,
Len(FrmSelISO.lstInstallableImg.Text) -
InStr(FrmSelISO.lstInstallableImg.text, "/") + 1)
@@ -324,7 +303,8 @@
'offer to reboot here
SELECT CASE Message.Question(ClsGlobal.DISTRO & Space(1) &
("has been installed on your computer.") & "<br>" &
- ("Would you like to reboot your computer now?"), ("Yes"), ("No"))
+ ("Additional system configuration will take place after you
reboot your system.Part of this process must be done in text mode.")
& "<br>" &
+ ("Would you like to reboot your computer now?"), ("Yes"),
("No"))
CASE 1
SHELL "shutdown -r now"
CASE ELSE
Modified: branches/iVL/FrmNetConf.class
==============================================================================
--- branches/iVL/FrmNetConf.class (original)
+++ branches/iVL/FrmNetConf.class Fri Oct 17 06:54:46 2008
@@ -42,7 +42,9 @@
END WITH
ME.txtHostName.text = ME.GET_CURRENT_HOST_NAME()
+
MdlNetConf.LIST_NETWORK_INTERFACES()
+ 'CATCH
cbUseManDNS.Value = FALSE
tlBanner.text = "<h3>" & tlBanner.text & "</h3>"
Modified: branches/iVL/MdlConfLilo.module
==============================================================================
--- branches/iVL/MdlConfLilo.module (original)
+++ branches/iVL/MdlConfLilo.module Fri Oct 17 06:54:46 2008
@@ -110,6 +110,8 @@
DIM i AS Integer
DIM sTarget AS String
DIM sDump AS String
+ DIM cb AS ComboBox
+ DIM cb1 AS ComboBox
SHELL "probedisk | grep -v cdrom |cut -f 1 -d \'|\'" TO sList
sList = Trim(sList)
@@ -120,9 +122,22 @@
NEXT
WITH FrmLilo.LiloTarget
- IF LCase(ClsPartSel.fRoot) <> "xfs" THEN
- .Add("Sector")
- END IF
+ 'IF LCase(ClsPartSel.fRoot) <> "xfs" THEN
+ FOR EACH cb IN MdlPartSel.oMountPoints
+ IF cb.text = "/" THEN
+ FOR EACH cb1 IN MdlPartSel.oFsTypes
+ IF cb1.tag = cb.tag THEN
+ IF cb1.text <> "xfs" THEN .Add("Sector")
+ END IF
+ NEXT
+ END IF
+ NEXT
+
+ '.Add("Sector")
+' END IF
+
+
+
SHELL "lsdev | grep floppy" TO sDump
IF sDump <> "" THEN
.Add("Floppy")
Modified: branches/iVL/MdlNetConf.module
==============================================================================
--- branches/iVL/MdlNetConf.module (original)
+++ branches/iVL/MdlNetConf.module Fri Oct 17 06:54:46 2008
@@ -299,17 +299,7 @@
END IF
-
- ' ' ELSE
- ' tl = NEW TextLabel(FrmNetConf.TSNetDevices)
AS "tlWirelessSecType"
- ' WITH tl
- ' .Move(4, y)
- ' .text = "Security Mode"
- ' .Width = MdlObjSizer.get_object_width(.text)
- ' .Height = 21
- ' .Alignment = Align.Normal
- ' END WITH
- ' END IF
+
END WITH
@@ -468,19 +458,6 @@
END IF
-END
-
-PUBLIC SUB bEnableInterface_click()
-
- ' ' DIM fFrm AS Frame
- ' ' DIM Comb AS ComboBox
- ' ' FOR EACH fFrm IN objFrames
- ' ' IF fFrm.tag = LAST.tag THEN fFrm.Enabled = LAST.Value
- ' ' NEXT
- ' ' FOR EACH Comb IN objCombos
- ' ' IF Comb.tag = LAST.tag THEN Comb.Enabled = LAST.Value
- ' ' NEXT
- '''''' ******* Instead of that ^, this will only determing if the inet
script will be set executable or not
END
|