From: Vincent Pit <vince@profvince.com>
Date: Tue, 14 Jul 2009 16:03:09 +0000 (+0200)
Subject: Document the diagnostics
X-Git-Tag: v0.16~3
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=a3df7ab3525a6310c383240fda61baa54e05b7bc;p=perl%2Fmodules%2Findirect.git

Document the diagnostics
---

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.