X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=users.pl;h=ba87e920b190bf488eb68e972125612711895e69;hb=03830799201db0b0f28e9c494fdd1b5b5143749c;hp=10cf840e11edbe6e0304cedea0be34ddac9285f0;hpb=089d1295b36afe84e412a35a8f8f3bd24b90c021;p=ndwebbie.git diff --git a/users.pl b/users.pl index 10cf840..ba87e92 100644 --- a/users.pl +++ b/users.pl @@ -19,10 +19,9 @@ use strict; use warnings FATAL => 'all'; -use POSIX; +use ND::Include; our $BODY; our $DBH; -our $LOG; $ND::TEMPLATE->param(TITLE => 'Users'); @@ -58,7 +57,7 @@ if ($user && defined param('cmd') && param('cmd') eq 'change'){ if ($DBH->do(qq{UPDATE users SET $column = ? WHERE uid = ? } ,undef,$value,$user->{uid})){ $user->{$column} = param($column); - $LOG->execute($ND::UID,"HC set $column to $value for user: $user->{uid}"); + log_message $ND::UID,"HC set $column to $value for user: $user->{uid}"; }else{ $error .= "

Something went wrong: ".$DBH->errstr."

"; } @@ -78,7 +77,9 @@ if ($user && defined param('cmd') && param('cmd') eq 'change'){ } if ($query){ if ($query->execute($user->{uid},$group->{gid})){ - $LOG->execute($ND::UID,"HC added user: $user->{uid} to group: $group->{gid}"); + my ($action,$a2) = ('added','to'); + ($action,$a2) = ('removed','from') if param($group->{gid}) eq 'remove'; + log_message $ND::UID,"HC $action user: $user->{uid} ($user->{username}) $a2 group: $group->{gid} ($group->{groupname})"; }else{ $error .= "

Something went wrong: ".$DBH->errstr."

"; }