X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2Findirect.pm;h=f793a831a8d549306976c653f032bc70c5d4a36b;hb=0bab4804e04c39ec8e6141b4fa78ee6a43a59491;hp=f4cc7dcdd7bb6cc7ca97f3cabb9a4d0f4bfd2521;hpb=42bd9744f4b818795038b68b497df7a75f60b4b1;p=perl%2Fmodules%2Findirect.git

diff --git a/lib/indirect.pm b/lib/indirect.pm
index f4cc7dc..f793a83 100644
--- a/lib/indirect.pm
+++ b/lib/indirect.pm
@@ -143,6 +143,16 @@ sub msg {
 
 True iff the module could have been built with thread-safety features enabled.
 
+=head1 DIAGNOSTICS
+
+=head2 C<Indirect call of method "%s" on object "%s" at %s line %d.>
+
+The default warning/exception message thrown when an indirect call on an object is found.
+
+=head2 C<Indirect call of method "%s" on a block at %s line %d.>
+
+The default warning/exception message thrown when an indirect call on a block is found.
+
 =head1 CAVEATS
 
 The implementation was tweaked to work around several limitations of vanilla C<perl> pragmas : it's thread safe, and doesn't suffer from a C<perl 5.8.x-5.10.0> bug that causes all pragmas to propagate into C<require>d scopes.