ui_link update

This commit is contained in:
Joe Cooper
2013-12-16 03:27:59 -06:00
parent 88f6f90c7c
commit 26123f423d
2 changed files with 8 additions and 9 deletions

View File

@@ -350,11 +350,10 @@ foreach $c (sort { $b cmp $a } @cats) {
$label = "";
if ($access{'acl'} && $in{'user'}) {
# Show link for editing ACL
$label = sprintf "<a href='edit_acl.cgi?".
"mod=%s&%s=%s'>%s</a>\n",
&urlize($m->{'dir'}),
"user", &urlize($in{'user'}),
$m->{'desc'};
$label = ui_link("edit_acl.cgi?" .
"mod=" . urlize($m->{'dir'}) .
"&group=". urlize($in{'group'}),
$m->{'desc'}) . "\n";
}
else {
# No privileges to edit ACL

8
acl/list_sessions.cgi Executable file → Normal file
View File

@@ -34,13 +34,13 @@ foreach $k (sort { @a=split(/\s+/, $sessiondb{$a}); @b=split(/\s+/, $sessiondb{$
push(@cols, "<b>$k</b>");
}
else {
push(@cols, "<a href='delete_session.cgi?id=$k'>$k</a>");
push(@cols, ui_link("delete_session.cgi?id=$k", $k));
}
if ($hasuser{$user}) {
push(@cols, "<a href='edit_user.cgi?user=$user'>$user</a>");
push(@cols, ui_link("edit_user.cgi?user=$user", $user));
}
elsif ($miniserv{'unixauth'}) {
push(@cols, "$user (<a href='edit_user.cgi?user=$miniserv{'unixauth'}'>$miniserv{'unixauth'}</a>)");
push(@cols, "$user (" . ui_link("edit_user.cgi?user=$miniserv{'unixauth'}", $miniserv{'unixauth'}) . ")");
}
else {
push(@cols, $user);
@@ -48,7 +48,7 @@ foreach $k (sort { @a=split(/\s+/, $sessiondb{$a}); @b=split(/\s+/, $sessiondb{$
push(@cols, $lip);
push(@cols, &make_date($ltime));
if ($haslog) {
push(@cols, "<a href='../webminlog/search.cgi?uall=1&mall=1&tall=1&wall=1&fall=1&sid=$k'>$text{'sessions_lview'}</a>");
push(@cols, ui_link("../webminlog/search.cgi?uall=1&mall=1&tall=1&wall=1&fall=1&sid=$k", $text{'sessions_lview'}));
}
print &ui_columns_row(\@cols);
}