cvsuser 02/06/07 15:41:34
Modified: P5EEx/Blue/P5EEx/Blue/Repository Sample.pm
Log:
updated method names
Revision Changes Path
1.3 +6 -6 p5ee/P5EEx/Blue/P5EEx/Blue/Repository/Sample.pm
Index: Sample.pm
===================================================================
RCS file: /cvs/public/p5ee/P5EEx/Blue/P5EEx/Blue/Repository/Sample.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -w -r1.2 -r1.3
--- Sample.pm 6 Jan 2002 20:57:07 -0000 1.2
+++ Sample.pm 7 Jun 2002 22:41:34 -0000 1.3
@@ -1,12 +1,12 @@
######################################################################
-## File: $Id: Sample.pm,v 1.2 2002/01/06 20:57:07 spadkins Exp $
+## File: $Id: Sample.pm,v 1.3 2002/06/07 22:41:34 spadkins Exp $
######################################################################
use P5EEx::Blue::Repository;
package P5EEx::Blue::Repository::Sample;
-$VERSION = do { my @r=(q$Revision: 1.2 $=~/\d+/g); sprintf "%d."."%02d"x$#r,@r};
+$VERSION = do { my @r=(q$Revision: 1.3 $=~/\d+/g); sprintf "%d."."%02d"x$#r,@r};
use P5EEx::Blue::Repository;
@ISA = ( "P5EEx::Blue::Repository" );
@@ -48,8 +48,8 @@
print $rep->error(), "\n" if ($rep->connect() != $rep->OK);
# META-DATA: (about the tables)
- $rep->load_rep_metadata_init();
- $rep->load_table_metadata_init($tablename);
+ $rep->load_rep_metadata_auto();
+ $rep->load_table_metadata_auto($tablename);
# MEDIUM-LEVEL: reads and writes rows, no caching
$row = $rep->select_row ($table, \@cols, \@wherecols,
\%wherevalues);
@@ -246,7 +246,7 @@
# (implement if desired. needed only if metadata already exists.)
######################################################################
-#sub load_rep_metadata_init {
+#sub load_rep_metadata_auto {
# my ($self) = @_;
#
# # repeat calls will get no farther than this.
@@ -273,7 +273,7 @@
#
#}
-#sub load_table_metadata_init {
+#sub load_table_metadata_auto {
# my ($self, $table) = @_;
#
# return if ($table eq "");
