Utilisation de LogonDrive au lieu de HomeDrive

tags/0.2.6 0.2.6
Daniel Berteaud 13 years ago
parent 9553ace923
commit 170484e4f8
  1. 2
      root/etc/e-smith/templates/etc/smb.conf/22MapHomeDir
  2. 16
      root/etc/e-smith/web/functions/logonscript
  3. 2
      root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/logonscript.pm

@ -1,2 +0,0 @@
logon drive = { $smb{'HomeDrive'} || 'h:' }

@ -42,14 +42,14 @@ __DATA__
<description>FIRSTPAGE_DESC</description> <description>FIRSTPAGE_DESC</description>
<field type="select" <field type="select"
id="homedrive" id="homedrive"
options="'a:' => 'A:', 'b:' => 'B:', 'c:' => 'C:', 'd:' => 'D:', options="'a' => 'A:', 'b' => 'B:', 'c' => 'C:', 'd' => 'D:',
'e:' => 'E:', 'f:' => 'F:', 'g:' => 'G:', 'h:' => 'H:', 'e' => 'E:', 'f' => 'F:', 'g' => 'G:', 'h' => 'H:',
'i:' => 'I:', 'j:' => 'J:', 'k:' => 'K:', 'l:' => 'L:', 'i' => 'I:', 'j' => 'J:', 'k' => 'K:', 'l' => 'L:',
'm:' => 'M:', 'n:' => 'N:', 'o:' => 'O:', 'p:' => 'P:', 'm' => 'M:', 'n' => 'N:', 'o' => 'O:', 'p' => 'P:',
'q:' => 'Q:', 'r:' => 'R:', 's:' => 'S:', 't:' => 'T:', 'q' => 'Q:', 'r' => 'R:', 's' => 'S:', 't' => 'T:',
'u:' => 'U:', 'v:' => 'V:', 'w:' => 'W:', 'x:' => 'X:', 'u' => 'U:', 'v' => 'V:', 'w' => 'W:', 'x' => 'X:',
'y:' => 'Y:', 'z:' => 'Z:'" 'y' => 'Y:', 'z' => 'Z:'"
value="get_prop('smb', 'HomeDrive')"> value="get_prop('smb', 'LogonDrive')">
<label>LABEL_HOME_DRIVE</label> <label>LABEL_HOME_DRIVE</label>
<description>DESC_HOME_DRIVE</description> <description>DESC_HOME_DRIVE</description>
</field> </field>

@ -61,7 +61,7 @@ sub save_change {
} }
print LOGON $logon; print LOGON $logon;
close LOGON; close LOGON;
$c->set_prop('smb', 'HomeDrive', $drive); $c->set_prop('smb', 'LogonDrive', $drive);
unless ( system ("/sbin/e-smith/signal-event", "workgroup-update") == 0 ){ unless ( system ("/sbin/e-smith/signal-event", "workgroup-update") == 0 ){
return $self->error('ERROR_OCCURED');; return $self->error('ERROR_OCCURED');;
} }

Loading…
Cancel
Save