[Rt-commit] r7232 - rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT

[ruz at bestpractical.com]

Author: ruz
Date: Tue Mar 13 10:49:17 2007
New Revision: 7232

Modified:
   rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Handle.pm

Log:
* switch to CamelCase

Modified: rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Handle.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Handle.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Handle.pm	Tue Mar 13 10:49:17 2007
@@ -327,11 +327,11 @@
     print "Done setting up database ACLs.\n";
 }
 
-=head2 insert_schema
+=head2 InsertSchema
 
 =cut
 
-sub insert_schema {
+sub InsertSchema {
     my $self = shift;
     my $dbh  = shift || $self->dbh;
     my $base_path = (shift || $RT::EtcPath);
@@ -425,11 +425,11 @@
 }
 
 
-=head2 insert_initial_data
+=head2 InsertInitialData
 
 =cut
 
-sub insert_initial_data {
+sub InsertInitialData {
     my $self    = shift;
     my $db_type = RT->Config->Get('DatabaseType');
     RT::InitLogging();
@@ -492,12 +492,12 @@
     $RT::Handle->Disconnect() unless $db_type eq 'SQLite';
 }
 
-=head insert_data
+=head InsertData
 
 =cut
 
 # load some sort of data into the database
-sub insert_data {
+sub InsertData {
     my $self     = shift;
     my $datafile = shift;