From: <cod...@go...> - 2008-12-10 15:05:32
|
Author: M0...@gm... Date: Wed Dec 10 07:04:16 2008 New Revision: 384 Modified: branches/iVL/.lang/FMain.pot branches/iVL/.project branches/iVL/FrmImportAccts.class branches/iVL/installer.gambas Log: Fixed permissions on imported home dir Modified: branches/iVL/.lang/FMain.pot ============================================================================== --- branches/iVL/.lang/FMain.pot (original) +++ branches/iVL/.lang/FMain.pot Wed Dec 10 07:04:16 2008 @@ -102,23 +102,23 @@ msgid "Please specify a hostname for this computer" msgstr "" -#: FMain.class:561 +#: FMain.class:562 msgid "Please specify the domain this computer belongs to" msgstr "" -#: FMain.class:808 +#: FMain.class:811 msgid "Back" msgstr "" -#: FMain.class:819 +#: FMain.class:822 msgid "Exit Installation" msgstr "" -#: FMain.class:830 +#: FMain.class:833 msgid "Next" msgstr "" -#: FMain.class:844 +#: FMain.class:847 msgid "Button1" msgstr "" Modified: branches/iVL/.project ============================================================================== --- branches/iVL/.project (original) +++ branches/iVL/.project Wed Dec 10 07:04:16 2008 @@ -2,7 +2,7 @@ # Compiled with Gambas 2.9.0 Title=VectorLinux Installer Startup=MdlCore -Version=0.1.13 +Version=0.1.14 Library=gb.gtk Library=gb.form Library=gb.debug Modified: branches/iVL/FrmImportAccts.class ============================================================================== --- branches/iVL/FrmImportAccts.class (original) +++ branches/iVL/FrmImportAccts.class Wed Dec 10 07:04:16 2008 @@ -162,14 +162,16 @@ ' Add the face icon IF Len(ME.tbPicPath.Text) > 0 THEN IF Exist(clsglobal.sTargetMnt &/ "home" &/ sname &/ ".face") THEN KILL clsglobal.sTargetMnt &/ "home" &/ sname &/ ".face" + IF Exist(sPicdir &/ sname & ".face.icon") THEN KILL sPicdir &/ sname & ".face.icon" SHELL "cd " & sPicdir & " && ln -s " & Replace(ME.tbPicPath.Text, ClsGlobal.sTargetMnt, "") & Space(1) & sname & ".face.icon" WAIT 'link for KDM + 'shell "cd " & sPicdir & " && ln -s " & Replace(me.tbPicPath.Text, clsglobal.sTargetMnt, "") & Space(1) & ' Tweak for the GDM face icon to work ' TRY COPY Trim(tbPicPath.Text) TO clsglobal.sTargetMnt &/ "home" &/ sname &/ ".face" EXEC ["cp", Trim(tbPicPath.Text), clsglobal.sTargetMnt &/ "home" &/ sname &/ ".face"] WAIT ' icon for GDM login EXEC ["chmod", "664", clsglobal.sTargetMnt &/ "home" &/ sname &/ ".face"] WAIT 'SHELL "chmod 644 " & ClsGlobal.sTargetMnt &/ "home/" & sname &/ ".face" WAIT - SHELL "chroot " & ClsGlobal.sTargetMnt & " chown " & sname & Space(1) &/ "home" &/ sname &/ ".face" WAIT - SHELL "chroot " & ClsGlobal.sTargetMnt & " chgrp " & sname & Space(1) &/ "home/" & sname &/ ".face" WAIT + SHELL "chroot " & ClsGlobal.sTargetMnt & " chown -R " & sname & Space(1) &/ "home" &/ sname WAIT + SHELL "chroot " & ClsGlobal.sTargetMnt & " chgrp -R " & sname & Space(1) &/ "home/" & sname WAIT IF ERROR THEN Message.Error(Error.Where & gb.NewLine & Error.Text) END IF Modified: branches/iVL/installer.gambas ============================================================================== Binary files. No diff available. |