<form method='post' action='$ENV{'SCRIPT_NAME'}'>
<table width='95%' cellspacing='0'>
<tr bgcolor='${Header::table1colour}'><td colspan='2' align='left'><b>$Lang::tr{'change passwords'}</b></td></tr>
- <tr><td align='left'>$Lang::tr{'username'}</td><td><input type='text' name='USERNAME' value='$username' size='30' /></td></tr>
+ <tr><td align='left'>$Lang::tr{'username'}</td><td><input type='text' name='USERNAME' value='$username' size='30' readonly /></td></tr>
<tr><td align='left'>$Lang::tr{'password'}</td><td><input type='password' name='PASSWORD' value='$password' size='30' /></td></tr>
<tr><td colspan='2' align='center'><input type='hidden' name='ACTION' value='smbchangepw' />
<input type='image' alt=$Lang::tr{'save'} src='/images/media-floppy.png' /></td></tr>
$options=qx(tail -$linestart $file | head -$lineend);
}
$hash{$namearray[$i]} = "$options";
-# print"<pre>$namearray[$i]\n$options\n</pre>"; # enable only for debuging
+ #print"<pre>$namearray[$i]\n$options\n</pre>"; # enable only for debuging
}
return(%hash);
}