cvsuser 04/11/29 08:18:55
Modified: App-Repository/lib/App Repository.pm
Log:
fixed reversed sub_exit()/sub_entry() calls
Revision Changes Path
1.16 +3 -3 p5ee/App-Repository/lib/App/Repository.pm
Index: Repository.pm
===================================================================
RCS file: /cvs/public/p5ee/App-Repository/lib/App/Repository.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- Repository.pm 22 Nov 2004 19:57:03 -0000 1.15
+++ Repository.pm 29 Nov 2004 16:18:55 -0000 1.16
@@ -1,6 +1,6 @@
#############################################################################
-## $Id: Repository.pm,v 1.15 2004/11/22 19:57:03 spadkins Exp $
+## $Id: Repository.pm,v 1.16 2004/11/29 16:18:55 spadkins Exp $
#############################################################################
package App::Repository;
@@ -2464,7 +2464,7 @@
=cut
sub _load_table_metadata {
- &App::sub_exit() if ($App::trace);
+ &App::sub_entry if ($App::trace);
my ($self, $table) = @_;
# if it's already been loaded, don't do it again
@@ -2537,7 +2537,7 @@
$table_def->{primary_key} = [ split(/ *, */,
$table_def->{primary_key}) ];
}
- &App::sub_entry if ($App::trace);
+ &App::sub_exit() if ($App::trace);
}
#############################################################################
