cvsuser 04/02/02 14:18:06
Modified: App-Context/lib/App Context.pm
Log:
added trace_subs to conf()
Revision Changes Path
1.14 +3 -1 p5ee/App-Context/lib/App/Context.pm
Index: Context.pm
===================================================================
RCS file: /cvs/public/p5ee/App-Context/lib/App/Context.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -w -r1.13 -r1.14
--- Context.pm 2 Feb 2004 21:23:16 -0000 1.13
+++ Context.pm 2 Feb 2004 22:18:06 -0000 1.14
@@ -1,6 +1,6 @@
#############################################################################
-## $Id: Context.pm,v 1.13 2004/02/02 21:23:16 spadkins Exp $
+## $Id: Context.pm,v 1.14 2004/02/02 22:18:06 spadkins Exp $
#############################################################################
package App::Context;
@@ -1287,7 +1287,9 @@
=cut
sub conf {
+ &App::sub_entry if ($App::trace_subs);
my $self = shift;
+ &App::sub_exit($self->{conf}) if ($App::trace_subs);
$self->{conf};
}