Add autocomplete to login. Updates to quota list
This commit is contained in:
parent
e49e180ce0
commit
b1e896c187
@ -67,7 +67,7 @@
|
|||||||
|
|
||||||
<div class="input-group mb-1">
|
<div class="input-group mb-1">
|
||||||
<div class="form-floating">
|
<div class="form-floating">
|
||||||
<input type="password" name="Password" id="password" class="form-control" placeholder="<%=l 'PASSWORD'%>">
|
<input type="password" name="Password" id="password" class="form-control" placeholder="<%=l 'PASSWORD'%>" autocomplete="on">
|
||||||
<label for="password">Password</label>
|
<label for="password">Password</label>
|
||||||
</div>
|
</div>
|
||||||
<div class="input-group-text">
|
<div class="input-group-text">
|
||||||
|
@ -4,11 +4,20 @@
|
|||||||
|
|
||||||
<%= $modul %>
|
<%= $modul %>
|
||||||
|
|
||||||
|
% if (config->{debug} == 1) {
|
||||||
|
<pre>
|
||||||
|
<%= dumper $c->current_route %>
|
||||||
|
<%= dumper $userAccounts %>
|
||||||
|
</pre>
|
||||||
|
% }
|
||||||
|
|
||||||
<h2><%= l 'quo_CURRENT_USAGE_AND_SETTINGS' %></h2>
|
<h2><%= l 'quo_CURRENT_USAGE_AND_SETTINGS' %></h2>
|
||||||
|
|
||||||
<br>
|
<br>
|
||||||
|
|
||||||
% my $numUsers = @$userAccounts;
|
% my $numUsers = @$userAccounts;
|
||||||
|
|
||||||
|
|
||||||
% if ($numUsers == 0){
|
% if ($numUsers == 0){
|
||||||
<%= l 'ACCOUNT_USER_NONE' %>
|
<%= l 'ACCOUNT_USER_NONE' %>
|
||||||
% } else {
|
% } else {
|
||||||
@ -32,14 +41,21 @@
|
|||||||
<tbody>
|
<tbody>
|
||||||
|
|
||||||
% foreach my $user (@$userAccounts) {
|
% foreach my $user (@$userAccounts) {
|
||||||
% my $uid = getpwnam($user->key);
|
|
||||||
% unless ($uid) {
|
% my $uid = getpwnam($user->key);
|
||||||
% warn($self->localise('COULD_NOT_GET_UID'),$user->key);
|
|
||||||
% next;
|
% if (config->{debug} == 1) {
|
||||||
% }
|
UID <%= l 'quo_COULD_NOT_GET_UID' %> <%= dumper $user->key %><br>
|
||||||
% my $name = $user->prop("FirstName")." ".$user->prop("LastName");
|
% }
|
||||||
% my $dev = Quota::getqcarg('/home/e-smith/files');
|
|
||||||
% my ($bc, $bs, $bh, $bt, $ic, $is, $ih, $it) = Quota::query($dev, $uid);
|
<br>
|
||||||
|
% unless ($uid) {
|
||||||
|
% warn (l 'quo_COULD_NOT_GET_UID', $user->key);
|
||||||
|
% next;
|
||||||
|
% }
|
||||||
|
% my $name = $user->prop("FirstName")." ".$user->prop("LastName");
|
||||||
|
% my $dev = Quota::getqcarg('/home/e-smith/files');
|
||||||
|
% my ($bc, $bs, $bh, $bt, $ic, $is, $ih, $it) = Quota::query($dev, $uid);
|
||||||
|
|
||||||
<tr>
|
<tr>
|
||||||
<td><%= $user->key %></td>
|
<td><%= $user->key %></td>
|
||||||
|
Loading…
x
Reference in New Issue
Block a user