From: <cod...@go...> - 2008-11-04 18:42:29
|
Author: M0E.lnx Date: Tue Nov 4 10:40:55 2008 New Revision: 258 Added: branches/iVL/FrmDone.class branches/iVL/FrmDone.form Modified: branches/iVL/.lang/FMain.pot branches/iVL/FMain.class branches/iVL/FMain.form branches/iVL/FrmXconf.class branches/iVL/FrmXconf.form branches/iVL/MdlConfLilo.module branches/iVL/MdlLiloOsList.module branches/iVL/MdlNetConf.module branches/iVL/MdlXconf.module Log: Implented quiet X configuration instead of full blown x configurator Modified: branches/iVL/.lang/FMain.pot ============================================================================== --- branches/iVL/.lang/FMain.pot (original) +++ branches/iVL/.lang/FMain.pot Tue Nov 4 10:40:55 2008 @@ -66,39 +66,39 @@ msgid "No" msgstr "" -#: FMain.class:382 +#: FMain.class:389 msgid "has been installed on your computer. Additional system configuration" msgstr "" -#: FMain.class:382 +#: FMain.class:389 msgid "will take place after you reboot your system.Part of this process must be done in text mode." msgstr "" -#: FMain.class:382 +#: FMain.class:389 msgid "Would you like to reboot your computer now?" msgstr "" -#: FMain.class:387 +#: FMain.class:394 msgid "The VectorLinux installer will now exit. Enjoy your new operating system" msgstr "" -#: FMain.class:454 +#: FMain.class:474 msgid "Process Overview" msgstr "" -#: FMain.class:474 +#: FMain.class:495 msgid "Next" msgstr "" -#: FMain.class:480 +#: FMain.class:501 msgid "Back" msgstr "" -#: FMain.class:486 +#: FMain.class:507 msgid "Exit Installation" msgstr "" -#: FMain.class:502 +#: FMain.class:523 msgid "Button1" msgstr "" Modified: branches/iVL/FMain.class ============================================================================== --- branches/iVL/FMain.class (original) +++ branches/iVL/FMain.class Tue Nov 4 10:40:55 2008 @@ -331,6 +331,13 @@ MdlNetConf.SET_DNS_ADDRESSES() MdlNetConf.WRITE_INET() + + ' CONFIGURE X QUIETLY HERE + MdlXconf.QUIET_XORG_CONFIGURATION() + + frmNext = FrmDone + + CASE "FrmDone" 'offer to reboot here ME.END_INSTALLER() frmNext = FrmAlsaConf @@ -426,5 +433,18 @@ MdlCore.frmInit = FrmSelISO MdlCore.main + +END + +PUBLIC SUB tvPlan_MouseDown() + + tvPlan.MoveLast() + RETURN + +END + +PUBLIC SUB tvPlan_Click() + +STOP EVENT END Modified: branches/iVL/FMain.form ============================================================================== --- branches/iVL/FMain.form (original) +++ branches/iVL/FMain.form Tue Nov 4 10:40:55 2008 @@ -9,6 +9,7 @@ { tvPlan TreeView MoveScaled(1,2,22,56) Expand = True + Mode = Select.None Border = False } } Added: branches/iVL/FrmDone.class ============================================================================== --- (empty file) +++ branches/iVL/FrmDone.class Tue Nov 4 10:40:55 2008 @@ -0,0 +1,30 @@ +' Gambas class file + +' This file is part of vinstall-ng + +' vinstall-ng is free software: you can redistribute it and/or modify +' it under the terms of the GNU General Public License as published by +' the Free Software Foundation, either version 2 of the License, or +' (at your option) any later version. + +' vinstall-ng is distributed in the hope that it will be useful, +' but WITHOUT ANY WARRANTY; without even the implied warranty of +' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +' GNU General Public License for more details. + +' You should have received a copy of the GNU General Public License +' along with vinstall-ng. If not, see <http://www.gnu.org/licenses/>. + + + +PUBLIC SUB Form_Open() + + FMain.FrmCurr = ME + + tlbanner.text = "<b>" & tlbanner.text & "</b>" + 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.") + END WITH + +END Added: branches/iVL/FrmDone.form ============================================================================== --- (empty file) +++ branches/iVL/FrmDone.form Tue Nov 4 10:40:55 2008 @@ -0,0 +1,25 @@ +# Gambas Form File 2.0 + +{ Form Form + MoveScaled(0,0,79,52) + Text = ("") + Arrangement = Arrange.Vertical + { tlBanner TextLabel + MoveScaled(0,0,25,3) + Text = ("Installation is finished") + } + { Separator1 Separator + MoveScaled(0,3,31,1) + } + { PnlMsg Panel + MoveScaled(1,5,74,24) + Expand = True + Arrangement = Arrange.Horizontal + { tlMsg TextLabel + MoveScaled(1,2,67,16) + Expand = True + AutoResize = True + Text = ("") + } + } +} Modified: branches/iVL/FrmXconf.class ============================================================================== --- branches/iVL/FrmXconf.class (original) +++ branches/iVL/FrmXconf.class Tue Nov 4 10:40:55 2008 @@ -86,134 +86,134 @@ END -PUBLIC SUB LIST_KBD_LAYOUTS() - - DIM sFile AS String '= File.Load("/etc/X11/xkb/rules/xorg.lst") - DIM i, ii AS Integer - DIM sArr AS String[] '= Split(sFile, "\n") - DIM sHack AS String - - ' ugly hack to get a good list begins here - sHack = "#!/bin/bash \n" & - "echo /dev/null > /tmp/kbd.file \n" & - "while read code desc1 desc2 junk \n" & - "do \n" & - "echo \"$code\" \"$desc1\" \"$desc2\" \"$junk\" >> /tmp/kbd.file \n" & - "done < /etc/X11/xkb/rules/xorg.lst" - - File.Save("/tmp/kbd_strip.sh", sHack) - SHELL "chmod +x /tmp/kbd_strip.sh" WAIT - SHELL "sh /tmp/kbd_strip.sh" WAIT - - ' END OF UGLY HACK HERE - - sFile = File.Load("/tmp/kbd.file") - sarr = Split(sFile, "\n") - - - ii = 1 - FOR i = 0 TO sArr.count - 1 - 'PRINT sArr[i] - 'IF Left(sArr[i], Len("! Layout")) = "! Layout" THEN - IF Left(sArr[i]) = "!" AND InStr(sArr[i], "layout") THEN - 'REPEAT - IF Trim(sarr[i + ii]) <> "" THEN - REPEAT - 'PRINT sarr[i + ii] - ME.cvKbLayout.Add(Left(sarr[i + ii], InStr(sarr[i + ii], " ")), Right(sarr[i + ii], Len(sarr[i + ii]) - InStr(sarr[i + ii], " "))) - INC ii - 'END IF - UNTIL Trim(sarr[i + ii]) = "" OR InStr(sarr[i + ii], "variant") = TRUE - END IF -END IF - NEXT - - - -END - -PUBLIC SUB LIST_KBD_VARIANTS() - - DIM sFile AS String '= File.Load("/etc/X11/xkb/rules/xorg.lst") - DIM i, ii AS Integer - DIM sArr AS String[] '= Split(sFile, "\n") - - - - sFile = File.Load("/tmp/kbd.file") - sarr = Split(sFile, "\n") - - - ii = 1 - FOR i = 0 TO sArr.count - 1 - 'PRINT sArr[i] - 'IF Left(sArr[i], Len("! Layout")) = "! Layout" THEN - IF Left(sArr[i]) = "!" AND InStr(sArr[i], "variant") THEN - 'REPEAT - IF Trim(sarr[i + ii]) <> "" THEN - REPEAT - 'PRINT sarr[i + ii] - ME.cvKbdVar.Add(Left(sarr[i + ii], InStr(sarr[i + ii], ":")), Right(sarr[i + ii], Len(sarr[i + ii]) - InStr(sarr[i + ii], ":"))) - INC ii - 'END IF - UNTIL Trim(sarr[i + ii]) = "" OR InStr(sarr[i + ii], "option") = TRUE - END IF -END IF - NEXT - -END - - - -PUBLIC SUB LIST_KBD_MODELS() - - DIM sFile AS String '= File.Load("/etc/X11/xkb/rules/xorg.lst") - DIM i, ii AS Integer - DIM sArr AS String[] '= Split(sFile, "\n") - 'DIM sHack AS String - - ' ' ugly hack to get a good list begins here - ' sHack = "#!/bin/bash \n" & - ' "echo /dev/null > /tmp/kbd.file \n" & - ' "while read code desc1 desc2 junk \n" & - ' "do \n" & - ' "echo \"$code\" \"$desc1\" \"$desc2\" \"$junk\" >> /tmp/kbd.file \n" & - ' "done < /etc/X11/xkb/rules/xorg.lst" - ' - ' File.Save("/tmp/kbd_strip.sh", sHack) - ' SHELL "chmod +x /tmp/kbd_strip.sh" WAIT - ' SHELL "sh /tmp/kbd_strip.sh" WAIT - - ' END OF UGLY HACK HERE - - sFile = File.Load("/tmp/kbd.file") - sarr = Split(sFile, "\n") - - - ii = 1 - FOR i = 0 TO sArr.count - 1 - 'PRINT sArr[i] - 'IF Left(sArr[i], Len("! Layout")) = "! Layout" THEN - IF Left(sArr[i]) = "!" AND InStr(sArr[i], "model") THEN - 'REPEAT - IF Trim(sarr[i + ii]) <> "" THEN - REPEAT - 'PRINT sarr[i + ii] - ME.cvKeybdModel.add(Left(sarr[i + ii], InStr(sarr[i + ii], " ")), Right(sarr[i + ii], Len(sarr[i + ii]) - InStr(sarr[i + ii], " "))) - INC ii - 'END IF - UNTIL Trim(sarr[i + ii]) = "" OR InStr(sarr[i + ii], "layout") = TRUE - END IF -END IF - NEXT - - - -END - - - - +' ' ' ' ' ' ' PUBLIC SUB LIST_KBD_LAYOUTS() +' ' ' ' ' ' ' +' ' ' ' ' ' ' DIM sFile AS String '= File.Load("/etc/X11/xkb/rules/xorg.lst") +' ' ' ' ' ' ' DIM i, ii AS Integer +' ' ' ' ' ' ' DIM sArr AS String[] '= Split(sFile, "\n") +' ' ' ' ' ' ' DIM sHack AS String +' ' ' ' ' ' ' +' ' ' ' ' ' ' ' ugly hack to get a good list begins here +' ' ' ' ' ' ' sHack = "#!/bin/bash \n" & +' ' ' ' ' ' ' "echo /dev/null > /tmp/kbd.file \n" & +' ' ' ' ' ' ' "while read code desc1 desc2 junk \n" & +' ' ' ' ' ' ' "do \n" & +' ' ' ' ' ' ' "echo \"$code\" \"$desc1\" \"$desc2\" \"$junk\" >> /tmp/kbd.file \n" & +' ' ' ' ' ' ' "done < /etc/X11/xkb/rules/xorg.lst" +' ' ' ' ' ' ' +' ' ' ' ' ' ' File.Save("/tmp/kbd_strip.sh", sHack) +' ' ' ' ' ' ' SHELL "chmod +x /tmp/kbd_strip.sh" WAIT +' ' ' ' ' ' ' SHELL "sh /tmp/kbd_strip.sh" WAIT +' ' ' ' ' ' ' +' ' ' ' ' ' ' ' END OF UGLY HACK HERE +' ' ' ' ' ' ' +' ' ' ' ' ' ' sFile = File.Load("/tmp/kbd.file") +' ' ' ' ' ' ' sarr = Split(sFile, "\n") +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' ii = 1 +' ' ' ' ' ' ' FOR i = 0 TO sArr.count - 1 +' ' ' ' ' ' ' 'PRINT sArr[i] +' ' ' ' ' ' ' 'IF Left(sArr[i], Len("! Layout")) = "! Layout" THEN +' ' ' ' ' ' ' IF Left(sArr[i]) = "!" AND InStr(sArr[i], "layout") THEN +' ' ' ' ' ' ' 'REPEAT +' ' ' ' ' ' ' IF Trim(sarr[i + ii]) <> "" THEN +' ' ' ' ' ' ' REPEAT +' ' ' ' ' ' ' 'PRINT sarr[i + ii] +' ' ' ' ' ' ' ME.cvKbLayout.Add(Left(sarr[i + ii], InStr(sarr[i + ii], " ")), Right(sarr[i + ii], Len(sarr[i + ii]) - InStr(sarr[i + ii], " "))) +' ' ' ' ' ' ' INC ii +' ' ' ' ' ' ' 'END IF +' ' ' ' ' ' ' UNTIL Trim(sarr[i + ii]) = "" OR InStr(sarr[i + ii], "variant") = TRUE +' ' ' ' ' ' ' END IF +' ' ' ' ' ' ' END IF +' ' ' ' ' ' ' NEXT +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' END +' ' ' ' ' ' ' +' ' ' ' ' ' ' PUBLIC SUB LIST_KBD_VARIANTS() +' ' ' ' ' ' ' +' ' ' ' ' ' ' DIM sFile AS String '= File.Load("/etc/X11/xkb/rules/xorg.lst") +' ' ' ' ' ' ' DIM i, ii AS Integer +' ' ' ' ' ' ' DIM sArr AS String[] '= Split(sFile, "\n") +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' sFile = File.Load("/tmp/kbd.file") +' ' ' ' ' ' ' sarr = Split(sFile, "\n") +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' ii = 1 +' ' ' ' ' ' ' FOR i = 0 TO sArr.count - 1 +' ' ' ' ' ' ' 'PRINT sArr[i] +' ' ' ' ' ' ' 'IF Left(sArr[i], Len("! Layout")) = "! Layout" THEN +' ' ' ' ' ' ' IF Left(sArr[i]) = "!" AND InStr(sArr[i], "variant") THEN +' ' ' ' ' ' ' 'REPEAT +' ' ' ' ' ' ' IF Trim(sarr[i + ii]) <> "" THEN +' ' ' ' ' ' ' REPEAT +' ' ' ' ' ' ' 'PRINT sarr[i + ii] +' ' ' ' ' ' ' ME.cvKbdVar.Add(Left(sarr[i + ii], InStr(sarr[i + ii], ":")), Right(sarr[i + ii], Len(sarr[i + ii]) - InStr(sarr[i + ii], ":"))) +' ' ' ' ' ' ' INC ii +' ' ' ' ' ' ' 'END IF +' ' ' ' ' ' ' UNTIL Trim(sarr[i + ii]) = "" OR InStr(sarr[i + ii], "option") = TRUE +' ' ' ' ' ' ' END IF +' ' ' ' ' ' ' END IF +' ' ' ' ' ' ' NEXT +' ' ' ' ' ' ' +' ' ' ' ' ' ' END +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' PUBLIC SUB LIST_KBD_MODELS() +' ' ' ' ' ' ' +' ' ' ' ' ' ' DIM sFile AS String '= File.Load("/etc/X11/xkb/rules/xorg.lst") +' ' ' ' ' ' ' DIM i, ii AS Integer +' ' ' ' ' ' ' DIM sArr AS String[] '= Split(sFile, "\n") +' ' ' ' ' ' ' 'DIM sHack AS String +' ' ' ' ' ' ' +' ' ' ' ' ' ' ' ' ugly hack to get a good list begins here +' ' ' ' ' ' ' ' sHack = "#!/bin/bash \n" & +' ' ' ' ' ' ' ' "echo /dev/null > /tmp/kbd.file \n" & +' ' ' ' ' ' ' ' "while read code desc1 desc2 junk \n" & +' ' ' ' ' ' ' ' "do \n" & +' ' ' ' ' ' ' ' "echo \"$code\" \"$desc1\" \"$desc2\" \"$junk\" >> /tmp/kbd.file \n" & +' ' ' ' ' ' ' ' "done < /etc/X11/xkb/rules/xorg.lst" +' ' ' ' ' ' ' ' +' ' ' ' ' ' ' ' File.Save("/tmp/kbd_strip.sh", sHack) +' ' ' ' ' ' ' ' SHELL "chmod +x /tmp/kbd_strip.sh" WAIT +' ' ' ' ' ' ' ' SHELL "sh /tmp/kbd_strip.sh" WAIT +' ' ' ' ' ' ' +' ' ' ' ' ' ' ' END OF UGLY HACK HERE +' ' ' ' ' ' ' +' ' ' ' ' ' ' sFile = File.Load("/tmp/kbd.file") +' ' ' ' ' ' ' sarr = Split(sFile, "\n") +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' ii = 1 +' ' ' ' ' ' ' FOR i = 0 TO sArr.count - 1 +' ' ' ' ' ' ' 'PRINT sArr[i] +' ' ' ' ' ' ' 'IF Left(sArr[i], Len("! Layout")) = "! Layout" THEN +' ' ' ' ' ' ' IF Left(sArr[i]) = "!" AND InStr(sArr[i], "model") THEN +' ' ' ' ' ' ' 'REPEAT +' ' ' ' ' ' ' IF Trim(sarr[i + ii]) <> "" THEN +' ' ' ' ' ' ' REPEAT +' ' ' ' ' ' ' 'PRINT sarr[i + ii] +' ' ' ' ' ' ' ME.cvKeybdModel.add(Left(sarr[i + ii], InStr(sarr[i + ii], " ")), Right(sarr[i + ii], Len(sarr[i + ii]) - InStr(sarr[i + ii], " "))) +' ' ' ' ' ' ' INC ii +' ' ' ' ' ' ' 'END IF +' ' ' ' ' ' ' UNTIL Trim(sarr[i + ii]) = "" OR InStr(sarr[i + ii], "layout") = TRUE +' ' ' ' ' ' ' END IF +' ' ' ' ' ' ' END IF +' ' ' ' ' ' ' NEXT +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' END +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' +' ' ' ' ' ' ' PUBLIC SUB Form_Resize() @@ -234,9 +234,9 @@ PUBLIC SUB Form_Menu() - ME.LIST_KBD_LAYOUTS - ME.LIST_KBD_MODELS - ME.LIST_KBD_VARIANTS +' ME.LIST_KBD_LAYOUTS +' ME.LIST_KBD_MODELS +' ME.LIST_KBD_VARIANTS END @@ -261,5 +261,11 @@ PUBLIC SUB cvKbLayout_Click() Message(LAST.current.key) + +END + +PUBLIC SUB Form_MouseDown() + + END Modified: branches/iVL/FrmXconf.form ============================================================================== --- branches/iVL/FrmXconf.form (original) +++ branches/iVL/FrmXconf.form Tue Nov 4 10:40:55 2008 @@ -13,81 +13,42 @@ } } { Panel1 Panel - MoveScaled(0,6,98,10) - Arrangement = Arrange.Horizontal + MoveScaled(0,7,98,31) AutoResize = True - { Frame1 Frame - MoveScaled(2,0,85,9) - Expand = True + { tlSetupMethod TextLabel + MoveScaled(0,0,13,3.4286) + Text = ("Video Driver") + Alignment = Align.Normal + } + { tlChoiceExp TextLabel + MoveScaled(0,4,35,3) Text = ("") - { tlChoiceExp TextLabel - MoveScaled(1,5,35,3) - Text = ("") - } - { cbSetupMethod ComboBox - MoveScaled(14,1,22,3) - Text = ("Vesa") - ReadOnly = True - List = [("Vesa"), ("Fbdev")] - } - { tlSetupMethod TextLabel - MoveScaled(1,1,13,3) - Text = ("Video Driver") - Alignment = Align.Normal - } - { tlColorDepth TextLabel - MoveScaled(42,1,11,3) - Text = ("Color Depth") - Alignment = Align.Normal - } - { cbColorDepth ComboBox - MoveScaled(52,1,24,3) - Text = ("") - List = [("24 bit True Color"), ("16 bit Pseudo Color"), ("8 bit 256 Color"), ("4 bit 16 Color"), ("1 bit Mono B/W")] - } - { tlScreenRes TextLabel - MoveScaled(42,4,18,3) - Text = ("Screen Resolution") - Alignment = Align.Normal - } - { cbScreenRes ComboBox - MoveScaled(60,4,16,3) - Text = ("") - List = [("1920x1280"), ("1600x1200"), ("1440x900"), ("1280x1024"), ("1280x800"), ("1024x768"), ("800x600"), ("640x480")] - } - } - } - { pblKbdSets Panel - MoveScaled(1,17,96,27) - Expand = True - Arrangement = Arrange.Horizontal - AutoResize = True - { frmkbdlay Frame - MoveScaled(0,0,30,25) - Expand = True - Text = ("Keyboard Layout") - { cvKbLayout ColumnView - MoveScaled(1,3,28,20) - Expand = True - } - } - { frmKbdMod Frame - MoveScaled(33,0,32,24) - Expand = True - Text = ("Keyboard Model") - { cvKeybdModel ColumnView - MoveScaled(1,3,29,21) - Expand = True - } - } - { frmkeyVar Frame - MoveScaled(67,1,27,23) - Expand = True - Text = ("Keyboard Variant") - { cvKbdVar ColumnView - MoveScaled(8,3,11,21) - Expand = True - } + } + { tlColorDepth TextLabel + MoveScaled(0,9,11,3) + Text = ("Color Depth") + Alignment = Align.Normal + } + { tlScreenRes TextLabel + MoveScaled(0,12,18,3) + Text = ("Screen Resolution") + Alignment = Align.Normal + } + { cbColorDepth ComboBox + MoveScaled(10,9,24,3) + Text = ("") + List = [("24 bit True Color"), ("16 bit Pseudo Color"), ("8 bit 256 Color"), ("4 bit 16 Color"), ("1 bit Mono B/W")] + } + { cbSetupMethod ComboBox + MoveScaled(13,0,22,3.4286) + Text = ("Vesa") + ReadOnly = True + List = [("Vesa"), ("Fbdev")] + } + { cbScreenRes ComboBox + MoveScaled(18,12,16,3) + Text = ("") + List = [("1920x1280"), ("1600x1200"), ("1440x900"), ("1280x1024"), ("1280x800"), ("1024x768"), ("800x600"), ("640x480")] } } } Modified: branches/iVL/MdlConfLilo.module ============================================================================== --- branches/iVL/MdlConfLilo.module (original) +++ branches/iVL/MdlConfLilo.module Tue Nov 4 10:40:55 2008 @@ -128,6 +128,7 @@ 'IF LCase(ClsPartSel.fRoot) <> "xfs" THEN FOR EACH cb IN MdlPartSel.oMountPoints IF cb.text = "/" THEN + ClsPartSel.sRoot = cb.Tag ' make sure this is set... we will need it later FOR EACH cb1 IN MdlPartSel.oFsTypes IF cb1.tag = cb.tag THEN IF cb1.text <> "xfs" THEN .Add("Sector") @@ -262,18 +263,18 @@ "read-only" & " \n \n" ENDIF - FOR EACH cbox IN MdlPartSel.oMountPoints - IF cbox.text = "/" AND bInc.tag = cbox.tag THEN - IF MdlLiloOsList.bVlCliOption = TRUE THEN - 'IF bInc.tag = ClsPartSel.sRoot AND MdlLiloOsList.bVlCliOption = TRUE THEN - sCliSection = Replace(sSection, "append = \"" & sEntryApnd & "\"", "append = \"2 " & sEntryApnd & "\"") 'splash=silent\"") - sCliSection = Replace(sCliSection, "label = " & sEntryLbl, "label = " & sEntryLbl & "-tui") - sCliSection = sCliSection & gb.NewLine + 'FOR EACH cbox IN MdlPartSel.oMountPoints + ' IF cbox.text = "/" AND cbox.tag = ClsPartSel.sRoot THEN + ' IF MdlLiloOsList.bVlCliOption = TRUE THEN + IF bInc.tag = ClsPartSel.sRoot AND MdlLiloOsList.bVlCliOption = TRUE THEN + sCliSection = Replace(sSection, "append = \"" & sEntryApnd & "\"", "append = \"2 " & sEntryApnd & "\"") 'splash=silent\"") + sCliSection = Replace(sCliSection, "label = " & sEntryLbl, "label = " & sEntryLbl & "-tui") + sCliSection = sCliSection & gb.NewLine ELSE - sCliSection = "" + sCliSection = "" END IF - END IF - NEXT + 'END IF + 'NEXT ELSE sSection = "" Modified: branches/iVL/MdlLiloOsList.module ============================================================================== --- branches/iVL/MdlLiloOsList.module (original) +++ branches/iVL/MdlLiloOsList.module Tue Nov 4 10:40:55 2008 @@ -484,10 +484,6 @@ END - - - - PUBLIC SUB OsList_click() Modified: branches/iVL/MdlNetConf.module ============================================================================== --- branches/iVL/MdlNetConf.module (original) +++ branches/iVL/MdlNetConf.module Tue Nov 4 10:40:55 2008 @@ -568,11 +568,11 @@ "# By the way, Arnt Gulbrandsen <agr...@nv...> says that 127.0.0.1 should NEVER \n" & "# be named with the name of the machine. It causes problem sor some programs, irc and \n" & "# reputedly talk. :^) \n#\n#\n" & - "# For loopbacking." & + "# For loopbacking. \n" & "127.0.0.1" & Space(5) & "localhost" & "\n" & "#\n#\n" & "# This next entry is technically wrong, but good enough to get TCP/IP applications to quit complaining \n" & - "# that they can\'t clarify the hostname on a loopback-only system \n#\n#\n#" & + "# that they can\'t clarify the hostname on a loopback-only system \n#\n#\n# \n" & "127.0.0.1" & Space(5) & sHostName & Space(5) & sHostName & "\n#\n#" & "# End of hosts." Modified: branches/iVL/MdlXconf.module ============================================================================== --- branches/iVL/MdlXconf.module (original) +++ branches/iVL/MdlXconf.module Tue Nov 4 10:40:55 2008 @@ -15,9 +15,10 @@ ' You should have received a copy of the GNU General Public License ' along with vinstall-ng. If not, see <http://www.gnu.org/licenses/>. - -PUBLIC SUB LIST_KBD_LAYOUT() +PUBLIC SUB QUIET_XORG_CONFIGURATION() - ' Read /etc/X11/xkb/rules/xorg.lst + SHELL "chroot " & ClsGlobal.sTargetMnt & " X -configure :2" WAIT + IF Exist(ClsGlobal.sTargetMnt &/ "etc" &/ "X11" &/ "xorg.conf") THEN MOVE ClsGlobal.sTargetMnt &/ "etc" &/ "X11" &/ "xorg.conf" TO ClsGlobal.sTargetMnt &/ "etc" &/ "X11" &/ "xorg.conf.dist" + COPY ClsGlobal.sTargetMnt &/ "root" &/ "xorg.conf.new" TO ClsGlobal.sTargetMnt &/ "etc" &/ "X11" &/ "xorg.conf" END |