[Vectorlinux-devel] [vinstall-ng commit] r391 - branches/iVL

[<cod...@go...>]

Author: M0...@gm...
Date: Thu Dec 11 12:14:38 2008
New Revision: 391

Modified:
    branches/iVL/.project
    branches/iVL/FrmCredits.class
    branches/iVL/FrmUserAdd.class
    branches/iVL/installer.gambas

Log:
debugged useradd module

Modified: branches/iVL/.project
==============================================================================
--- branches/iVL/.project	(original)
+++ branches/iVL/.project	Thu Dec 11 12:14:38 2008
@@ -2,7 +2,7 @@
  # Compiled with Gambas 2.9.0
  Title=VectorLinux Installer
  Startup=MdlCore
-Version=0.1.24
+Version=0.1.26
  Library=gb.gtk
  Library=gb.form
  Library=gb.debug

Modified: branches/iVL/FrmCredits.class
==============================================================================
--- branches/iVL/FrmCredits.class	(original)
+++ branches/iVL/FrmCredits.class	Thu Dec 11 12:14:38 2008
@@ -29,7 +29,7 @@
  PUBLIC SUB Form_Open()
    ME.TextLabel1.Adjust
    ME.TextLabel1.Height = ME.ScrollView1.Height * 15
-  'ME.Timer1.Enabled = TRUE
+  ME.Timer1.Enabled = TRUE

  END


Modified: branches/iVL/FrmUserAdd.class
==============================================================================
--- branches/iVL/FrmUserAdd.class	(original)
+++ branches/iVL/FrmUserAdd.class	Thu Dec 11 12:14:38 2008
@@ -182,7 +182,8 @@
              'the next lines are for gdm
              'PRINT tbPicPath.Text
              'SHELL "cp " & Replace(tbPicPath.Text,  
ClsGlobal.sTargetMnt, "") & Space(1) & ClsGlobal.sTargetMnt &/ "home/" &  
tbUsername.Text & "/.face" WAIT
-            COPY Trim(tbPicPath.Text) TO clsglobal.sTargetMnt &/ "home" &/  
tbUsername.text &/ ".face"
+            'COPY Trim(tbPicPath.Text) TO clsglobal.sTargetMnt &/ "home"  
&/ tbUsername.text &/ ".face"
+            EXEC ["cp", Trim(tbPicPath.Text), clsglobal.sTargetMnt  
&/ "home" &/ tbUsername.Text &/ ".face"] WAIT
              SHELL "chmod 644 " & ClsGlobal.sTargetMnt &/ "home/" &  
tbUsername.Text & "/.face" WAIT
              SHELL "chroot " & ClsGlobal.sTargetMnt & " chown " &  
tbUsername.Text & Space(1) &/ "home/" & tbUsername.Text & "/.face" WAIT
              SHELL "chroot " & ClsGlobal.sTargetMnt & " chgrp " &  
tbUsername.Text & Space(1) &/ "home/" & tbUsername.Text & "/.face" WAIT

Modified: branches/iVL/installer.gambas
==============================================================================
Binary files. No diff available.