version 1.25, 2004/12/20 19:53:36
|
version 1.26, 2005/02/09 21:21:08
|
Line 1182 sub drop_table {
|
Line 1182 sub drop_table {
|
return 1; # if we got here there was no error, so return a 'true' value |
return 1; # if we got here there was no error, so return a 'true' value |
} |
} |
|
|
|
########################################## |
|
|
|
=pod |
|
|
|
=item fix_table_name |
|
|
|
Fixes a table name so that it will work with MySQL. |
|
|
|
=cut |
|
|
|
########################################## |
|
sub fix_table_name { |
|
my ($name) = @_; |
|
$name =~ s/^(\d+e\d+)/_$1/; |
|
return $name; |
|
} |
|
|
|
|
# ---------------------------- convert 'time' format into a datetime sql format |
# ---------------------------- convert 'time' format into a datetime sql format |