File tree 1 file changed +3
-3
lines changed
1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -129,7 +129,7 @@ sub AUTOLOAD {
129
129
no strict ' refs' ;
130
130
my $rc = $Test -> $comparator ( $self -> $getter , $str , $name );
131
131
if (!$rc && $self -> error_callback) {
132
- &{$self -> error_callback}($name );
132
+ &{$self -> error_callback}( $name , $self );
133
133
}
134
134
return $rc ;
135
135
};
@@ -144,7 +144,7 @@ sub AUTOLOAD {
144
144
no strict ' refs' ;
145
145
my $rc = $Test -> $comparator ( $self -> $getter ($locator ), $str , $name );
146
146
if (!$rc && $self -> error_callback) {
147
- &{$self -> error_callback}($name );
147
+ &{$self -> error_callback}( $name , $self );
148
148
}
149
149
return $rc ;
150
150
};
@@ -171,7 +171,7 @@ sub AUTOLOAD {
171
171
diag($@ ) if $@ ;
172
172
$rc = ok( $rc , $name );
173
173
if (!$rc && $self -> error_callback) {
174
- &{$self -> error_callback}($name );
174
+ &{$self -> error_callback}( $name , $self );
175
175
}
176
176
return $rc ;
177
177
};
You can’t perform that action at this time.
0 commit comments