|
From: <cod...@go...> - 2008-12-04 18:31:43
|
Author: M0...@gm...
Date: Thu Dec 4 10:30:29 2008
New Revision: 365
Modified:
branches/iVL/.lang/FrmDiskPart.pot
branches/iVL/.lang/MdlSetup.pot
branches/iVL/FrmDiskPart.class
branches/iVL/FrmDone.class
branches/iVL/FrmUserAdd.class
branches/iVL/FrmZoneSet.class
branches/iVL/MdlSetup.module
branches/iVL/MdlZoneSet.module
Log:
Minor bugfixes... ready for testing
Modified: branches/iVL/.lang/FrmDiskPart.pot
==============================================================================
--- branches/iVL/.lang/FrmDiskPart.pot (original)
+++ branches/iVL/.lang/FrmDiskPart.pot Thu Dec 4 10:30:29 2008
@@ -18,7 +18,7 @@
msgid "When finished making changes, exit the partitioning application to
continue ..."
msgstr ""
-#: FrmDiskPart.class:117
+#: FrmDiskPart.class:119
msgid "Disk Partitioning:"
msgstr ""
Modified: branches/iVL/.lang/MdlSetup.pot
==============================================================================
--- branches/iVL/.lang/MdlSetup.pot (original)
+++ branches/iVL/.lang/MdlSetup.pot Thu Dec 4 10:30:29 2008
@@ -38,3 +38,35 @@
msgid "Preparing filesystems"
msgstr ""
+#: MdlSetup.module:345
+msgid "is performing final system configuration. Please wait a moment."
+msgstr ""
+
+#: MdlSetup.module:353
+msgid "has been installed to your system. Your new system has been
configured with the default factory settings."
+msgstr ""
+
+#: MdlSetup.module:353
+msgid "After reboot you can use vasm or vasmCC to fine tune your
installation."
+msgstr ""
+
+#: MdlSetup.module:353
+msgid "Your computer needs to be restarted so that you can use your new
operating system. Click"
+msgstr ""
+
+#: MdlSetup.module:353
+msgid "to restart your computer now or click"
+msgstr ""
+
+#: MdlSetup.module:353
+msgid "to restart your computer at a later time"
+msgstr ""
+
+#: MdlSetup.module:353
+msgid "If you installed from CD-ROM/R/RW media, please remove de disk
before restarting."
+msgstr ""
+
+#: MdlSetup.module:356
+msgid "Restart"
+msgstr ""
+
Modified: branches/iVL/FrmDiskPart.class
==============================================================================
--- branches/iVL/FrmDiskPart.class (original)
+++ branches/iVL/FrmDiskPart.class Thu Dec 4 10:30:29 2008
@@ -64,6 +64,7 @@
DIM bReboot AS Boolean
+ MdlCore.WARN_STATUS("")
FrmDiskPart.tlBanner.Text = "<h3><br>Analyzing system partitioning
scheme... Please wait<br>This will take a few seconds...</h3>"
FrmDiskPart.tlBanner.Refresh
FrmDiskPart.tlBanner.Adjust
@@ -95,4 +96,5 @@
FMain.btQuit.Enabled = TRUE
FMain.btQuit.ForeColor = Color.Black
END IF
+ MdlCore.warn_status_off()
END
Modified: branches/iVL/FrmDone.class
==============================================================================
--- branches/iVL/FrmDone.class (original)
+++ branches/iVL/FrmDone.class Thu Dec 4 10:30:29 2008
@@ -25,31 +25,10 @@
Fmain.tvPlan["Conf5"].Selected = TRUE
tlbanner.text = "<b>" & tlbanner.text & "</b>"
- FMain.btnext.Text = ("Restart")
- FMain.btnext.Width = MdlObjSizer.get_object_width(FMain.btnext.Text) + 36
+
FMain.btback.Enabled = FALSE
FMain.btback.ForeColor = Color.Gray
- FMain.btQuit.Text = ("Exit")
- FMain.btQuit.Width = MdlObjSizer.get_object_width(FMain.btQuit.Text) + 36
- WITH ME.tlMsg
- .Text = ClsGlobal.DISTRO & Space(1) & ("has been installed to your
system. Your new system has been configured with the default factory
settings.") & "<br><br>" &
- ("After reboot you can use vasm or vasmCC to fine tune your
installation.") & "<br><br>" &
- ("Your computer needs to be restarted so that you can use your new
operating system. Click") & Space(1) & FMain.btnext.text & Space(1)&
- ("to restart your computer now or click") & Space(1) &
FMain.btQuit.Text & Space(1) & ("to restart your computer at a later time")
& "<br><br" &
- ("If you installed from CD-ROM/R/RW media, please remove de disk
before restarting.")
- END WITH
- FMain.btnext.Enabled = TRUE
-
-END
-
-PUBLIC SUB tlMsg_MouseDown()
-
-
-
-END
-
-PUBLIC SUB PnlMsg_MouseDown()
-
+ MdlSetup.END_INSTALLER()
END
Modified: branches/iVL/FrmUserAdd.class
==============================================================================
--- branches/iVL/FrmUserAdd.class (original)
+++ branches/iVL/FrmUserAdd.class Thu Dec 4 10:30:29 2008
@@ -46,6 +46,8 @@
PUBLIC SUB Form_Open()
+ DIM cb AS CheckBox
+
Fmain.frmcurr = ME
MdlUsrAdd.iUsrAccts = 0
WITH FMain
@@ -76,7 +78,12 @@
.Add(ME.tbUsername)
END WITH
-
+ IF MdlUsrAdd.objGrps THEN
+ FOR EACH cb IN MdlUsrAdd.objGrps
+ cb.Delete
+ NEXT
+ END IF
+
MdlUsrAdd.DISPLAY_USER_GROUP_OPTIONS(ME.fGroupSel)
FMain.btnext.Enabled = TRUE
ME.tbUsername.SetFocus
Modified: branches/iVL/FrmZoneSet.class
==============================================================================
--- branches/iVL/FrmZoneSet.class (original)
+++ branches/iVL/FrmZoneSet.class Thu Dec 4 10:30:29 2008
@@ -40,14 +40,7 @@
END
-' ' ' PUBLIC SUB Button1_Click()
-' ' ' ' THis is not necessary, since the next button on the main window
handles this
-' ' '
-' ' ' MdlZoneSet.SET_ZONE(ME.lbTmZone.Text)
-' ' ' MdlZoneSet.WRITE_CONF()
-' ' ' 'Message("TimeZone " & ME.lbTmZone.Text & " Was set.")
-' ' '
-' ' ' END
+
PUBLIC SUB Form_Resize()
@@ -96,38 +89,7 @@
RETURN
END IF
LOOP
-' ' ' ' '
-' ' ' ' '
-' ' ' ' '
-' ' ' ' ' 'Message(lbTmZone[2].text)
-' ' ' ' '
-' ' ' ' ' lbTmZone.Index = 0
-' ' ' ' ' REPEAT
-' ' ' ' ' 'INC lbTmZone.Index
-' ' ' ' '
-' ' ' ' ' IF lbTmZone[lbTmZone.Index].text LIKE Key.Text & "*" THEN
-' ' ' ' '
-' ' ' ' ' 'Message.Info(lbTmZone.text)
-' ' ' ' ' BREAK
-' ' ' ' ' END IF
-' ' ' ' ' INC lbTmZone.Index
-' ' ' ' ' IF lbTmZone.Index = lbTmZone.Count THEN RETURN ' nothing
found
-' ' ' ' ' UNTIL lbTmZone.Index = lbTmZone.Count
-' ' ' ' '
-
- ' DIM iScan AS Integer
- ' IF Key.text > "z" OR Key.text < " " THEN RETURN ' not scannable
- '
- ' iScan = lbTmZone.Index
- ' DO
- ' INC iScan
- ' IF iScan >= lbTmZone.Count THEN iScan = 0 ' back to top
- ' IF iScan = lbTmZone.Index THEN RETURN ' went back to were we
started
- ' IF lbTmZone[iScan].text LIKE Key.text & "*[*]*" THEN ' found
a match
- ' lbTmZone.Index = iScan
- ' END IF
- ' RETURN
- ' LOOP
+
END
Modified: branches/iVL/MdlSetup.module
==============================================================================
--- branches/iVL/MdlSetup.module (original)
+++ branches/iVL/MdlSetup.module Thu Dec 4 10:30:29 2008
@@ -336,4 +336,34 @@
END
+PUBLIC SUB END_INSTALLER()
+DIM sText AS String
+ ' Check for /tmp/status in the target installation
+ IF Exist(ClsGlobal.sTargetMnt &/ "tmp" &/ "status") = FALSE THEN
+ REPEAT
+ WAIT
+ sText = ClsGlobal.DISTRO & Space(1) & ("is performing final system
configuration. Please wait a moment.")
+ FrmDone.tlMsg.Text = sText
+ 'FrmDone.tlMsg.Adjust
+ UNTIL Exist(ClsGlobal.sTargetMnt &/ "tmp" &/ "status") = TRUE
+ sText = ClsGlobal.DISTRO & Space(1) & ("has been installed to your
system. Your new system has been configured with the default factory
settings.") & "<br><br>" &
+ ("After reboot you can use vasm or vasmCC to fine tune your
installation.") & "<br><br>" &
+ ("Your computer needs to be restarted so that you can use your new
operating system. Click") & Space(1) & FMain.btnext.text & Space(1)&
+ ("to restart your computer now or click") & Space(1) &
FMain.btQuit.Text & Space(1) & ("to restart your computer at a later time")
& "<br><br" &
+ ("If you installed from CD-ROM/R/RW media, please remove de disk
before restarting.")
+ FrmDone.tlMsg.Text = sText
+ FMain.btnext.Enabled = TRUE
+ FMain.btnext.Text = ("Restart")
+ FMain.btnext.Width = MdlObjSizer.get_object_width(FMain.btnext.Text) +
36
+
+ 'FrmDone.tlBanner
+
+ ENDIF
+
+
+
+
+END
+
+
Modified: branches/iVL/MdlZoneSet.module
==============================================================================
--- branches/iVL/MdlZoneSet.module (original)
+++ branches/iVL/MdlZoneSet.module Thu Dec 4 10:30:29 2008
@@ -37,7 +37,7 @@
stz = Split(sTimeZones, ",")
FOR EACH stz
- FrmZoneSet.lbTmZone.add(stz[i])
+ FrmZoneSet.lbTmZone.add(Trim(stz[i]))
INC i
NEXT
|