|
From: <cod...@go...> - 2008-12-08 20:02:24
|
Author: M0...@gm...
Date: Mon Dec 8 11:42:11 2008
New Revision: 379
Modified:
branches/iVL/.lang/#project.pot
branches/iVL/.lang/ClsGlobal.pot
branches/iVL/.lang/ClsPartSel.pot
branches/iVL/.lang/ClsWinDrives.pot
branches/iVL/.lang/FMain.pot
branches/iVL/.lang/FrmDiskPart.pot
branches/iVL/.lang/FrmPartScheme.pot
branches/iVL/.lang/FrmPartSel.pot
branches/iVL/.lang/FrmPkgSel.pot
branches/iVL/.lang/FrmSelISO.pot
branches/iVL/.lang/FrmSummary.pot
branches/iVL/.lang/FrmWinDrives.pot
branches/iVL/.lang/MdlCore.pot
branches/iVL/.lang/MdlDiskPart.pot
branches/iVL/.lang/MdlObjSizer.pot
branches/iVL/.lang/MdlPartSel.pot
branches/iVL/.lang/MdlPkgSel.pot
branches/iVL/.lang/MdlSetup.pot
branches/iVL/.lang/MdlSummarize.pot
branches/iVL/.lang/MdlWinDrives.pot
branches/iVL/.project
branches/iVL/FMain.class
branches/iVL/FrmDone.class
branches/iVL/FrmImportAccts.class
branches/iVL/FrmLangSel.class
branches/iVL/FrmLiloSetup.class
branches/iVL/FrmNetConf.class
branches/iVL/FrmPkgSel.class
branches/iVL/FrmRootPass.class
branches/iVL/FrmZoneSet.class
branches/iVL/MdlResetSettings.module
branches/iVL/installer.gambas
Log:
- Fixed debugging references to /etc/skel and user.home in user import
module
- Fixed some reverse navigation after installation is complete.
Modified: branches/iVL/.lang/#project.pot
==============================================================================
--- branches/iVL/.lang/#project.pot (original)
+++ branches/iVL/.lang/#project.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/.project
+# /home/vlmaster/devel/installer/.project
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/ClsGlobal.pot
==============================================================================
--- branches/iVL/.lang/ClsGlobal.pot (original)
+++ branches/iVL/.lang/ClsGlobal.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/ClsGlobal.class
+# /home/vlmaster/devel/installer/ClsGlobal.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/ClsPartSel.pot
==============================================================================
--- branches/iVL/.lang/ClsPartSel.pot (original)
+++ branches/iVL/.lang/ClsPartSel.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/ClsPartSel.class
+# /home/vlmaster/devel/installer/ClsPartSel.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/ClsWinDrives.pot
==============================================================================
--- branches/iVL/.lang/ClsWinDrives.pot (original)
+++ branches/iVL/.lang/ClsWinDrives.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/ClsWinDrives.class
+# /home/vlmaster/devel/installer/ClsWinDrives.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/FMain.pot
==============================================================================
--- branches/iVL/.lang/FMain.pot (original)
+++ branches/iVL/.lang/FMain.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FMain.class
+# /home/vlmaster/devel/installer/FMain.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
@@ -18,107 +18,95 @@
msgid "Restart"
msgstr ""
-#: FMain.class:229
-msgid "Please select a default operating system to boot before proceeding"
-msgstr ""
-
-#: FMain.class:230
-msgid "Select an entry from this list"
-msgstr ""
-
-#: FMain.class:238
-msgid "Skipping boot loaded setup"
-msgstr ""
-
-#: FMain.class:251
-msgid "Passwords do not match. Please enter the same password twice"
+#: FMain.class:363
+msgid "Please wait while setup attampts to run the partitioning utility"
msgstr ""
-#: FMain.class:266
-msgid "You have not created any user accounts for this system yet. There
is not enough information"
+#: FMain.class:365
+msgid "Please wait while setup analyses your current partition setup."
msgstr ""
-#: FMain.class:266
-msgid "to create an account here. It is recommended that you create at
least one."
+#: FMain.class:365
+msgid "This may take a while ..."
msgstr ""
-#: FMain.class:266
-msgid "Would you like to continue anyway?"
+#: FMain.class:385
+msgid "You must select a \"/\" partition. This is the target where the
system will install to"
msgstr ""
-#: FMain.class:266
-msgid "Yes"
+#: FMain.class:447
+msgid "Please select a default operating system to boot before proceeding"
msgstr ""
-#: FMain.class:266
-msgid "No"
+#: FMain.class:448
+msgid "Select an entry from this list"
msgstr ""
-#: FMain.class:284
-msgid "Please specify a hostname for this computer"
+#: FMain.class:457
+msgid "Skipping boot loader setup"
msgstr ""
-#: FMain.class:288
-msgid "Please specify the domain this computer belongs to"
+#: FMain.class:483
+msgid "Skipping lilo setup"
msgstr ""
-#: FMain.class:303
-msgid "VectorLinux will now try to detect and configure your graphics
hardware."
+#: FMain.class:499
+msgid "Please enter the root password. For your security purposes, do not
leave this blank"
msgstr ""
-#: FMain.class:303
-msgid "Your screen may flicker or go blank for a few seconds during this
process."
+#: FMain.class:504
+msgid "Passwords do not match. Please enter the same password twice"
msgstr ""
-#: FMain.class:366
-msgid "Please wait while setup attampts to run the partitioning utility"
+#: FMain.class:517
+msgid "Setup has detected existing directories in the partition you
selected for /home."
msgstr ""
-#: FMain.class:368
-msgid "Please wait while setup analyses your current partition setup."
+#: FMain.class:517
+msgid "Would you like to import these user accounts into your new
Operating System"
msgstr ""
-#: FMain.class:368
-msgid "This may take a while ..."
+#: FMain.class:517
+msgid "Yes"
msgstr ""
-#: FMain.class:388
-msgid "You must select a \"/\" partition. This is the target where the
system will install to"
+#: FMain.class:517
+msgid "No"
msgstr ""
-#: FMain.class:460
-msgid "Skipping boot loader setup"
+#: FMain.class:535
+msgid "You have not created any user accounts for this system yet. There
is not enough information"
msgstr ""
-#: FMain.class:486
-msgid "Skipping lilo setup"
+#: FMain.class:535
+msgid "to create an account here. It is recommended that you create at
least one."
msgstr ""
-#: FMain.class:502
-msgid "Please enter the root password. For your security purposes, do not
leave this blank"
+#: FMain.class:535
+msgid "Would you like to continue anyway?"
msgstr ""
-#: FMain.class:520
-msgid "Setup has detected existing directories in the partition you
selected for /home."
+#: FMain.class:553
+msgid "Please specify a hostname for this computer"
msgstr ""
-#: FMain.class:520
-msgid "Would you like to import these user accounts into your new
Operating System"
+#: FMain.class:557
+msgid "Please specify the domain this computer belongs to"
msgstr ""
-#: FMain.class:823
+#: FMain.class:811
msgid "Back"
msgstr ""
-#: FMain.class:834
+#: FMain.class:822
msgid "Exit Installation"
msgstr ""
-#: FMain.class:845
+#: FMain.class:833
msgid "Next"
msgstr ""
-#: FMain.class:859
+#: FMain.class:847
msgid "Button1"
msgstr ""
Modified: branches/iVL/.lang/FrmDiskPart.pot
==============================================================================
--- branches/iVL/.lang/FrmDiskPart.pot (original)
+++ branches/iVL/.lang/FrmDiskPart.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmDiskPart.class
+# /home/vlmaster/devel/installer/FrmDiskPart.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/FrmPartScheme.pot
==============================================================================
--- branches/iVL/.lang/FrmPartScheme.pot (original)
+++ branches/iVL/.lang/FrmPartScheme.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmPartScheme.class
+# /home/vlmaster/devel/installer/FrmPartScheme.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/FrmPartSel.pot
==============================================================================
--- branches/iVL/.lang/FrmPartSel.pot (original)
+++ branches/iVL/.lang/FrmPartSel.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmPartSel.class
+# /home/vlmaster/devel/installer/FrmPartSel.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/FrmPkgSel.pot
==============================================================================
--- branches/iVL/.lang/FrmPkgSel.pot (original)
+++ branches/iVL/.lang/FrmPkgSel.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmPkgSel.class
+# /home/vlmaster/devel/installer/FrmPkgSel.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
@@ -38,15 +38,15 @@
msgid "Choose your optional components to install."
msgstr ""
-#: FrmPkgSel.class:200
+#: FrmPkgSel.class:197
msgid "TextLabel1"
msgstr ""
-#: FrmPkgSel.class:210
+#: FrmPkgSel.class:207
msgid "Full Install"
msgstr ""
-#: FrmPkgSel.class:215
+#: FrmPkgSel.class:212
msgid "Custom Install"
msgstr ""
Modified: branches/iVL/.lang/FrmSelISO.pot
==============================================================================
--- branches/iVL/.lang/FrmSelISO.pot (original)
+++ branches/iVL/.lang/FrmSelISO.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmSelISO.class
+# /home/vlmaster/devel/installer/FrmSelISO.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/FrmSummary.pot
==============================================================================
--- branches/iVL/.lang/FrmSummary.pot (original)
+++ branches/iVL/.lang/FrmSummary.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmSummary.class
+# /home/vlmaster/devel/installer/FrmSummary.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/FrmWinDrives.pot
==============================================================================
--- branches/iVL/.lang/FrmWinDrives.pot (original)
+++ branches/iVL/.lang/FrmWinDrives.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/FrmWinDrives.class
+# /home/vlmaster/devel/installer/FrmWinDrives.class
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlCore.pot
==============================================================================
--- branches/iVL/.lang/MdlCore.pot (original)
+++ branches/iVL/.lang/MdlCore.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlCore.module
+# /home/vlmaster/devel/installer/MdlCore.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlDiskPart.pot
==============================================================================
--- branches/iVL/.lang/MdlDiskPart.pot (original)
+++ branches/iVL/.lang/MdlDiskPart.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlDiskPart.module
+# /home/vlmaster/devel/installer/MdlDiskPart.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlObjSizer.pot
==============================================================================
--- branches/iVL/.lang/MdlObjSizer.pot (original)
+++ branches/iVL/.lang/MdlObjSizer.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlObjSizer.module
+# /home/vlmaster/devel/installer/MdlObjSizer.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlPartSel.pot
==============================================================================
--- branches/iVL/.lang/MdlPartSel.pot (original)
+++ branches/iVL/.lang/MdlPartSel.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlPartSel.module
+# /home/vlmaster/devel/installer/MdlPartSel.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlPkgSel.pot
==============================================================================
--- branches/iVL/.lang/MdlPkgSel.pot (original)
+++ branches/iVL/.lang/MdlPkgSel.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlPkgSel.module
+# /home/vlmaster/devel/installer/MdlPkgSel.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlSetup.pot
==============================================================================
--- branches/iVL/.lang/MdlSetup.pot (original)
+++ branches/iVL/.lang/MdlSetup.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlSetup.module
+# /home/vlmaster/devel/installer/MdlSetup.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlSummarize.pot
==============================================================================
--- branches/iVL/.lang/MdlSummarize.pot (original)
+++ branches/iVL/.lang/MdlSummarize.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlSummarize.module
+# /home/vlmaster/devel/installer/MdlSummarize.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.lang/MdlWinDrives.pot
==============================================================================
--- branches/iVL/.lang/MdlWinDrives.pot (original)
+++ branches/iVL/.lang/MdlWinDrives.pot Mon Dec 8 11:42:11 2008
@@ -1,4 +1,4 @@
-# /root/gui-installer/MdlWinDrives.module
+# /home/vlmaster/devel/installer/MdlWinDrives.module
# Generated by Gambas compiler
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
Modified: branches/iVL/.project
==============================================================================
--- branches/iVL/.project (original)
+++ branches/iVL/.project Mon Dec 8 11:42:11 2008
@@ -2,7 +2,7 @@
# Compiled with Gambas 2.9.0
Title=VectorLinux Installer
Startup=MdlCore
-Version=0.1.16
+Version=0.1.12
Library=gb.gtk
Library=gb.form
Library=gb.debug
@@ -12,12 +12,12 @@
Library=gb.gtk.ext
Description=GUI installer for Vector linux
Authors=M0E-lnx\nuelsk8s
+Arguments=""
TabSize=2
Translate=1
Language=en_US
ControlPublic=1
ModulePublic=1
-ExecPath=/root/gui-installer/installer.gambas
Maintainer=M0E-lnx
Vendor=VectorLinux
Add...@gm...
Modified: branches/iVL/FMain.class
==============================================================================
--- branches/iVL/FMain.class (original)
+++ branches/iVL/FMain.class Mon Dec 8 11:42:11 2008
@@ -210,124 +210,121 @@
END IF
- IF Application.Args[1] = "-C" THEN
- ' navigation for configuration
- SELECT CASE FrmCurr.Name
- CASE "FrmPartSel"
- MdlPartSel.SET_LINUX_PARTITION_TYPES()
- frmNext = FrmLiloSetup
- IF ERROR THEN Message.Error(Error.Where & "<br>" &
Error.Text)
- CASE "FrmInstallSys"
- frmNext = FrmLiloSetup
- CASE "FrmLiloSetup"
-
- IF FrmLiloSetup.cbYNLilo.Value = FALSE THEN
- IF FrmLiloSetup.cbBootDefault.Text = "" THEN '
FMain.tvPlan["Inst0"].Picture = MdlCore.sDonePic
-' FMain.tvPlan["Inst1"].Picture = MdlCore.sNowPic
-' FMain.tvPlan["Inst1"].Selected = TRUE
- 'ME.tlBanner.Text = "<h3>" & tlBanner.Text & "</h3xt = "" THEN
- Message.Warning(("Please select a default operating system
to boot before proceeding"))
- Balloon.Info(("Select an entry from this list"),
FrmLiloSetup.cbBootDefault)
- FMain.btnext.Enabled = TRUE
- STOP EVENT
- RETURN
- END IF
- 'Run the setup
- MdlLilo.TRIGGER_LILO_SETUP()
- ELSE
- FrmLiloSetup.tlBanner.Text = "<b>" & ("Skipping boot loaded setup")
& "</b>"
- END IF
- 'SHELL "mount -o bind /mnt/target/lib /lib && depmod -aq &&
/etc/rc.d/rc.udev restart"
- frmNext = FrmZoneSet
-
- CASE "FrmZoneSet"
- 'MdlZoneSet.TIME_ZONES()
- MdlZoneSet.SET_ZONE(Trim(FrmZoneSet.lbTmZone.text))
- MdlZoneSet.WRITE_CONF()
- frmNext = FrmRootPass
-
- CASE "FrmRootPass"
- IF FrmRootPass.tbPasswd1.Text <> FrmRootPass.tbPasswd2.Text THEN
- Balloon.Error(("Passwords do not match. Please enter the same
password twice"), FrmRootPass.tbPasswd2)
- FrmRootPass.tbPasswd2.SelectAll
- RETURN
- END IF
- FrmRootPass.Button1_Click()
- frmNext = FrmUserAdd
-
-
- CASE "FrmUserAdd"
-
- IF MdlUsrAdd.iUsrAccts = 0 THEN
- 'IF FrmUserAdd.tbUsername.text = "" THEN
- IF MdlUsrAdd.CREATE_USER_ON_A_SNAP() = FALSE THEN
- SELECT CASE Message.Question(("You have not created any user
accounts for this system yet. There is not enough information") & "<br>" &
- ("to create an account here. It is recommended that you create
at least one.") & "<br>" &
- "<br>" & ("Would you like to continue anyway?"), ("Yes"),
("No"))
-
- CASE 2
- RETURN
- END SELECT
- ELSE IF MdlUsrAdd.CREATE_USER_ON_A_SNAP() = TRUE THEN
- FrmUserAdd.Button1_Click()
- END IF
- END IF
-
- SHELL "cp /mnt/target/etc/modules.conf >/etc/modules.conf" WAIT
- SHELL "ifconfig eth0 up" WAIT
- SHELL "chmod 700 /mnt/target/home/*"
- frmNext = FrmNetConf
-
-
- CASE "FrmNetConf"
- IF Trim(FrmNetConf.txtHostName.Text) = "" THEN
- Balloon.Error(("Please specify a hostname for this computer"),
FrmNetConf.txtHostName)
- RETURN
- END IF
- IF Trim(FrmNetConf.tbDomain.Text) = "" THEN
- Balloon.Error(("Please specify the domain this computer belongs
to"), FrmNetConf.tbDomain)
- RETURN
- END IF
-
- IF MdlNetConf.ifaceCnt = 0 THEN
- MdlNetConf.SET_HOSTNAME(FrmNetConf.txtHostName.Text,
FrmNetConf.tbDomain.Text)
- ELSE ' IF MdlNetConf > 0 THEN
- MdlNetConf.SET_HOSTNAME(FrmNetConf.txtHostName.text,
FrmNetConf.tbDomain.Text)
- MdlNetConf.SET_DNS_ADDRESSES()
- MdlNetConf.WRITE_INET()
- END IF
-
-
- ' CONFIGURE X QUIETLY HERE
- Message.Warning(("VectorLinux will now try to detect and
configure your graphics hardware.") & "<br>" &
- ("Your screen may flicker or go blank for a few seconds during
this process."))
-
- MdlXconf.QUIET_XORG_CONFIGURATION()
-
- frmNext = FrmDone
-
- CASE "FrmDone"
- 'offer to reboot here
-
- SHELL ["sed", "-i", "'/^$/d'", "/root/gui.log"] WAIT
- SHELL ["sed", "-i", "'/^(installer/d'", "/root/gui.log"] WAIT
- COPY "/root/gui.log" TO "/mnt/target/var/log/setup/gui.log"
- ME.END_INSTALLER()
- 'frmNext = FrmAlsaConf
-' frmNext = FrmLilo ' this is already done
-
- CASE "FrmAlsaConf"
-
- frmNext = FrmXconf
-
- END SELECT
-
-
- frmNext.Reparent(FrmCurr.Parent)
- frmNext.Show
+ ''' IF Application.Args[1] = "-C" THEN
+' ' ' ' navigation for configuration
+' ' ' SELECT CASE FrmCurr.Name
+' ' ' CASE "FrmPartSel"
+' ' ' MdlPartSel.SET_LINUX_PARTITION_TYPES()
+' ' ' frmNext = FrmLiloSetup
+' ' ' IF ERROR THEN Message.Error(Error.Where & "<br>" &
Error.Text)
+' ' ' CASE "FrmInstallSys"
+' ' ' frmNext = FrmLiloSetup
+' ' ' CASE "FrmLiloSetup"
+' ' '
+' ' ' IF FrmLiloSetup.cbYNLilo.Value = FALSE THEN
+' ' ' IF FrmLiloSetup.cbBootDefault.Text = "" THEN
+' ' ' Message.Warning(("Please select a default operating
system to boot before proceeding"))
+' ' ' Balloon.Info(("Select an entry from this list"),
FrmLiloSetup.cbBootDefault)
+' ' ' FMain.btnext.Enabled = TRUE
+' ' ' STOP EVENT
+' ' ' RETURN
+' ' ' END IF
+' ' ' 'Run the setup
+' ' ' MdlLilo.TRIGGER_LILO_SETUP()
+' ' ' ELSE
+' ' ' FrmLiloSetup.tlBanner.Text = "<b>" & ("Skipping boot loaded
setup") & "</b>"
+' ' ' END IF
+' ' ' 'SHELL "mount -o bind /mnt/target/lib /lib && depmod -aq
&& /etc/rc.d/rc.udev restart"
+' ' ' frmNext = FrmZoneSet
+' ' '
+' ' ' CASE "FrmZoneSet"
+' ' ' 'MdlZoneSet.TIME_ZONES()
+' ' ' MdlZoneSet.SET_ZONE(Trim(FrmZoneSet.lbTmZone.text))
+' ' ' MdlZoneSet.WRITE_CONF()
+' ' ' frmNext = FrmRootPass
+' ' '
+' ' ' CASE "FrmRootPass"
+' ' ' IF FrmRootPass.tbPasswd1.Text <> FrmRootPass.tbPasswd2.Text
THEN
+' ' ' Balloon.Error(("Passwords do not match. Please enter the
same password twice"), FrmRootPass.tbPasswd2)
+' ' ' FrmRootPass.tbPasswd2.SelectAll
+' ' ' RETURN
+' ' ' END IF
+' ' ' FrmRootPass.Button1_Click()
+' ' ' frmNext = FrmUserAdd
+' ' '
+' ' '
+' ' ' CASE "FrmUserAdd"
+' ' '
+' ' ' IF MdlUsrAdd.iUsrAccts = 0 THEN
+' ' '
+' ' ' IF MdlUsrAdd.CREATE_USER_ON_A_SNAP() = FALSE THEN
+' ' ' SELECT CASE Message.Question(("You have not created any
user accounts for this system yet. There is not enough information")
& "<br>" &
+' ' ' ("to create an account here. It is recommended that you
create at least one.") & "<br>" &
+' ' ' "<br>" & ("Would you like to continue anyway?"),
("Yes"), ("No"))
+' ' '
+' ' ' CASE 2
+' ' ' RETURN
+' ' ' END SELECT
+' ' ' ELSE IF MdlUsrAdd.CREATE_USER_ON_A_SNAP() = TRUE THEN
+' ' ' FrmUserAdd.Button1_Click()
+' ' ' END IF
+' ' ' END IF
+' ' '
+' ' ' SHELL "cp /mnt/target/etc/modules.conf >/etc/modules.conf" WAIT
+' ' ' SHELL "ifconfig eth0 up" WAIT
+' ' ' SHELL "chmod 700 /mnt/target/home/*"
+' ' ' frmNext = FrmNetConf
+' ' '
+' ' '
+' ' ' CASE "FrmNetConf"
+' ' ' IF Trim(FrmNetConf.txtHostName.Text) = "" THEN
+' ' ' Balloon.Error(("Please specify a hostname for this
computer"), FrmNetConf.txtHostName)
+' ' ' RETURN
+' ' ' END IF
+' ' ' IF Trim(FrmNetConf.tbDomain.Text) = "" THEN
+' ' ' Balloon.Error(("Please specify the domain this computer
belongs to"), FrmNetConf.tbDomain)
+' ' ' RETURN
+' ' ' END IF
+' ' '
+' ' ' IF MdlNetConf.ifaceCnt = 0 THEN
+' ' ' MdlNetConf.SET_HOSTNAME(FrmNetConf.txtHostName.Text,
FrmNetConf.tbDomain.Text)
+' ' ' ELSE ' IF MdlNetConf > 0 THEN
+' ' ' MdlNetConf.SET_HOSTNAME(FrmNetConf.txtHostName.text,
FrmNetConf.tbDomain.Text)
+' ' ' MdlNetConf.SET_DNS_ADDRESSES()
+' ' ' MdlNetConf.WRITE_INET()
+' ' ' END IF
+' ' '
+' ' '
+' ' ' ' CONFIGURE X QUIETLY HERE
+' ' ' Message.Warning(("VectorLinux will now try to detect and
configure your graphics hardware.") & "<br>" &
+' ' ' ("Your screen may flicker or go blank for a few seconds
during this process."))
+' ' '
+' ' ' MdlXconf.QUIET_XORG_CONFIGURATION()
+' ' '
+' ' ' frmNext = FrmDone
+' ' '
+' ' ' CASE "FrmDone"
+' ' ' 'offer to reboot here
+' ' '
+' ' ' SHELL ["sed", "-i", "'/^$/d'", "/root/gui.log"] WAIT
+' ' ' SHELL ["sed", "-i", "'/^(installer/d'", "/root/gui.log"]
WAIT
+' ' ' COPY "/root/gui.log" TO "/mnt/target/var/log/setup/gui.log"
+' ' ' ME.END_INSTALLER()
+' ' ' 'frmNext = FrmAlsaConf
+' ' ' ' frmNext = FrmLilo ' this is already done
+' ' '
+' ' ' CASE "FrmAlsaConf"
+' ' '
+' ' ' frmNext = FrmXconf
+' ' '
+' ' ' END SELECT
+' ' '
+' ' '
+' ' ' frmNext.Reparent(FrmCurr.Parent)
+' ' ' frmNext.Show
- ELSE
+ '''ELSE
IF ERROR THEN Message(Error.Where & "<br>" & Error.Text)
@@ -623,7 +620,7 @@
END IF
END IF
-END IF
+'''END IF
tvPlan.Refresh()
ClsGlobal.sBackNav.Add(FrmCurr)
'FMain.tlStatus.Text = ""
@@ -639,18 +636,7 @@
UNTIL Exist(ClsGlobal.sTargetMnt &/ "tmp" &/ "status") = TRUE
END IF
- ' ' ' ' '
- ' ' ' ' ' SELECT CASE Message.Question(ClsGlobal.DISTRO & Space(1) &
("has been installed on your computer. Additional system configuration")
& "<br>" &
- ' ' ' ' ' ("will take place after you reboot your system.Part
of this process must be done in text mode.") & "<br><br>" &
- ' ' ' ' ' ("Would you like to reboot your computer now?"),
("Yes"), ("No"))
- ' ' ' ' ' CASE 1
- ' ' ' ' ' SHELL "shutdown -r now"
- ' ' ' ' ' CASE ELSE
- ' ' ' ' ' RETURN
- ' ' ' ' ' Message.Info(("The VectorLinux installer will now exit.
Enjoy your new operating system"))
- ' ' ' ' ' QUIT ' dirty quit event
- ' ' ' ' ' 'STOP EVENT
- ' ' ' ' ' END SELECT
+
END
@@ -664,7 +650,6 @@
DIM frm AS Form
-
iKey = ClsGlobal.sBackNav.Find(FrmCurr)
IF iKey <> -1 THEN
frm = ClsGlobal.sBackNav[iKey - 1]
@@ -676,6 +661,9 @@
frm.Show
ClsGlobal.sBackNav.Add(frm)
END IF
+
+
+
END
Modified: branches/iVL/FrmDone.class
==============================================================================
--- branches/iVL/FrmDone.class (original)
+++ branches/iVL/FrmDone.class Mon Dec 8 11:42:11 2008
@@ -69,3 +69,9 @@
END
+
+PUBLIC SUB Form_Show()
+
+ ME.Form_Open()
+
+END
Modified: branches/iVL/FrmImportAccts.class
==============================================================================
--- branches/iVL/FrmImportAccts.class (original)
+++ branches/iVL/FrmImportAccts.class Mon Dec 8 11:42:11 2008
@@ -256,3 +256,9 @@
' ME.pbLogin.Picture.Clear
END
+
+PUBLIC SUB Form_Show()
+
+ ME.Form_Open()
+
+END
Modified: branches/iVL/FrmLangSel.class
==============================================================================
--- branches/iVL/FrmLangSel.class (original)
+++ branches/iVL/FrmLangSel.class Mon Dec 8 11:42:11 2008
@@ -70,8 +70,6 @@
WITH ME
.tlBanner.Move(8, 4, MdlObjSizer.get_object_width(.tlBanner.text))
.Separator1.Move(8, .tlBanner.top + .tlBanner.Height
- .Separator1.Height, .ClientWidth - (.Separator1.Left * 2))
- '.GridView1.Move(8, .tlBanner.top + .tlBanner.Height + 4)
- '.GridView1.Resize((ME.Width / 3), ME.Height - (.tlBanner.Height * 2))
.lbLangSel.Move(8, .tlBanner.top + .tlBanner.Height + 4)
.lbLangSel.Resize((ME.Width / 3), ME.Height - (.tlBanner.Height * 2))
END WITH
@@ -87,25 +85,14 @@
-' ' ' PUBLIC SUB lbLangSel_KeyPress()
-' ' '
-' ' ' DIM i AS Integer
-' ' ' IF Key.text > "z" OR Key.text < " " THEN RETURN
-' ' ' i = LAST.index
-' ' ' DO
-' ' ' INC i
-' ' ' IF i > LAST.count - 1 THEN i = 0
-' ' ' IF i = LAST.index THEN RETURN
-' ' ' IF LAST[i].text LIKE Key.Text & "*" THEN
-' ' ' LAST.index = i
-' ' ' RETURN
-' ' ' END IF
-' ' ' LOOP
-' ' '
-' ' ' END
-
PUBLIC SUB lblangsel_Click()
+
+END
+
+PUBLIC SUB Form_Show()
+
+ ME.Form_Open()
END
Modified: branches/iVL/FrmLiloSetup.class
==============================================================================
--- branches/iVL/FrmLiloSetup.class (original)
+++ branches/iVL/FrmLiloSetup.class Mon Dec 8 11:42:11 2008
@@ -131,3 +131,9 @@
END
+
+PUBLIC SUB Form_Show()
+
+ ME.Form_Open()
+
+END
Modified: branches/iVL/FrmNetConf.class
==============================================================================
--- branches/iVL/FrmNetConf.class (original)
+++ branches/iVL/FrmNetConf.class Mon Dec 8 11:42:11 2008
@@ -144,3 +144,10 @@
END
+
+PUBLIC SUB Form_Show()
+
+ ME.Form_Open()
+
+
+END
Modified: branches/iVL/FrmPkgSel.class
==============================================================================
--- branches/iVL/FrmPkgSel.class (original)
+++ branches/iVL/FrmPkgSel.class Mon Dec 8 11:42:11 2008
@@ -143,10 +143,7 @@
PUBLIC SUB Form_Hide()
-' IF ClsPkgSel.bCustom = FALSE THEN
-'
-' ' FMain.tvPlan["Prep2"].Picture = MdlCore.sDonePic
-' END IF
+
END
PUBLIC SUB Form_Show()
Modified: branches/iVL/FrmRootPass.class
==============================================================================
--- branches/iVL/FrmRootPass.class (original)
+++ branches/iVL/FrmRootPass.class Mon Dec 8 11:42:11 2008
@@ -82,13 +82,14 @@
END
PUBLIC SUB Form_Show()
-FMain.FrmCurr = ME
-
- WITH FMain
- .tvPlan["Conf1"].Picture = MdlCore.sDonePic
- .tvPlan["Conf2"].picture = MdlCore.sNowPic
- .tvPlan["Conf2"].Selected = TRUE
- END WITH
+' FMain.FrmCurr = ME
+'
+' WITH FMain
+' .tvPlan["Conf1"].Picture = MdlCore.sDonePic
+' .tvPlan["Conf2"].picture = MdlCore.sNowPic
+' .tvPlan["Conf2"].Selected = TRUE
+' END WITH
+ME.Form_Open()
END
Modified: branches/iVL/FrmZoneSet.class
==============================================================================
--- branches/iVL/FrmZoneSet.class (original)
+++ branches/iVL/FrmZoneSet.class Mon Dec 8 11:42:11 2008
@@ -96,13 +96,14 @@
PUBLIC SUB Form_Show()
- Fmain.frmcurr = ME
- ME.tlbanner.Text = "<h3>" & ("Timezone configuration") & "</h3>"
- WITH FMain
- .tvPlan["Conf0"].Picture = MdlCore.sDonePic
- .tvPlan["Conf1"].picture = MdlCore.sNowPic
- .tvPlan["Conf1"].Selected = TRUE
- END WITH
-
+ME.Form_Open()
+ ' Fmain.frmcurr = ME
+ ' ME.tlbanner.Text = "<h3>" & ("Timezone configuration") & "</h3>"
+ ' WITH FMain
+ ' .tvPlan["Conf0"].Picture = MdlCore.sDonePic
+ ' .tvPlan["Conf1"].picture = MdlCore.sNowPic
+ ' .tvPlan["Conf1"].Selected = TRUE
+ ' END WITH
+ '
END
Modified: branches/iVL/MdlResetSettings.module
==============================================================================
--- branches/iVL/MdlResetSettings.module (original)
+++ branches/iVL/MdlResetSettings.module Mon Dec 8 11:42:11 2008
@@ -19,12 +19,10 @@
PUBLIC SUB LIST_RESETABLE_SETTINGS()
DIM sFile, sDesc, sSkellPath, stargetPath AS String
DIM i AS Integer
-
- 'ClsGlobal.sTargetMnt = "/"
- 'sSkellPath = ClsGlobal.sTargetMnt &/ "etc" &/ "skel"
- sSkellPath = "/etc/skel"
- stargetPath = User.Home
- 'stargetPath = ClsGlobal.sTargetMnt &/ "home" &/
Trim(FrmImportAccts.cbAccntList.Text)
+
+ sSkellPath = ClsGlobal.sTargetMnt &/ "etc" &/ "skel"
+ stargetPath = ClsGlobal.sTargetMnt &/ "home" &/
Trim(FrmImportAccts.cbAccntList.Text)
+
i = 0
pYes = FrmPkgSel.pYes
Modified: branches/iVL/installer.gambas
==============================================================================
Binary files. No diff available.
|