Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP

Comparing changes

Choose two branches to see what's changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
base fork: tonycoz/bse
base: aa3a4f444d
...
head fork: tonycoz/bse
compare: 8cc0eddc84
Checking mergeability… Don't worry, you can still create the pull request.
  • 3 commits
  • 2 files changed
  • 0 commit comments
  • 1 contributor
View
13 site/cgi-bin/modules/BSE/AdminUsers.pm
@@ -9,7 +9,7 @@ use BSE::TB::AdminUsers;
use BSE::TB::AdminGroups;
use BSE::Util::Iterate;
-our $VERSION = "1.005";
+our $VERSION = "1.006";
my %actions =
(
@@ -136,8 +136,7 @@ sub _save_htusers {
sub common_tags {
my ($class, $req, $msg, $errors) = @_;
- $errors ||= +{};
- $msg ||= $req->message($errors);
+ $msg = $req->message($errors || $msg);
my @users;
my $user_index;
@@ -300,6 +299,14 @@ sub req_adduser {
$class->_save_htusers($req, \$msg);
+ $req->audit
+ (
+ component => "admin:users:adduser",
+ object => $user,
+ msg => "User '".$user->logon."' created",
+ level => "info",
+ );
+
return $class->refresh($req, 'a_showuser', userid=>$user->{id},
'm'=>$msg);
}
View
4 site/cgi-bin/modules/BSE/Password/Plain.pm
@@ -1,7 +1,7 @@
package BSE::Password::Plain;
use strict;
-our $VERSION = "1.000";
+our $VERSION = "1.001";
sub new {
my ($class) = @_;
@@ -12,7 +12,7 @@ sub new {
sub hash {
my ($self, $password) = @_;
- return $password;
+ die "Plain password hashing is not supported for new passwords";
}
sub check {

No commit comments for this range

Something went wrong with that request. Please try again.