1use strict;
2use warnings;
3
4use Mojolicious::Lite;
5use Test::More;
6
7open my $log_handle, '>', \my $log_buffer;
8app->log->handle($log_handle);
9
10eval {
11	plugin 'SetUserGroup' => {
12		user  => 'bad user name !!!!!',
13	};
14};
15
16my $error = $@;
17like(
18	$error,
19	qr/User "bad user name !!!!!" does not exist/,
20	'plugin croaks on bad user at register'
21);
22like(
23	$log_buffer,
24	qr/User "bad user name !!!!!" does not exist/,
25	'plugin logs error on bad user at register'
26);
27
28$log_buffer = '';
29
30eval {
31	plugin 'SetUserGroup' => {
32		user  => scalar getpwuid $>,
33		group => 'bad group name !!!!!',
34	};
35};
36
37$error = $@;
38like(
39	$error,
40	qr/Group "bad group name !!!!!" does not exist/,
41	'plugin croaks on bad user at register'
42);
43like(
44	$log_buffer,
45	qr/Group "bad group name !!!!!" does not exist/,
46	'plugin logs error on bad user at register'
47);
48
49done_testing;
50