|
Lines 86-101
subtest 'get_user() tests' => sub {
Link Here
|
| 86 |
auth_client_get_user => sub { |
86 |
auth_client_get_user => sub { |
| 87 |
$_[1]->{mapped_data}->{firstname} = 'test name modified 1'; |
87 |
$_[1]->{mapped_data}->{firstname} = 'test name modified 1'; |
| 88 |
return; |
88 |
return; |
| 89 |
}, |
89 |
} |
| 90 |
retrieve_data => sub { return $_[1] eq 'priority' ? 2 : undef; } |
|
|
| 91 |
}, |
90 |
}, |
| 92 |
{ |
|
|
| 93 |
auth_client_get_user => sub { |
| 94 |
$_[1]->{mapped_data}->{firstname} = 'test name modified 2'; |
| 95 |
return; |
| 96 |
}, |
| 97 |
retrieve_data => sub { return $_[1] eq 'priority' ? 1 : undef; } |
| 98 |
} |
| 99 |
]; |
91 |
]; |
| 100 |
my @plugins; |
92 |
my @plugins; |
| 101 |
foreach my $method ( @{$methods} ) { |
93 |
foreach my $method ( @{$methods} ) { |
| 102 |
- |
|
|