Changeset 2083 for trunk/LATMOS-Accounts/lib
- Timestamp:
- 09/18/17 19:49:37 (7 years ago)
- Location:
- trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases
- Files:
-
- 1 added
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql.pm
r2082 r2083 18 18 our $VERSION = (q$Rev$ =~ /^Rev: (\d+) /)[0]; 19 19 20 sub SCHEMA_VERSION { 11};20 sub SCHEMA_VERSION { 26 }; 21 21 22 22 =head1 NAME … … 98 98 $self->log(LA_DEBUG, 'New connection to DB'); 99 99 100 { 101 my $sv = $self->get_global_value('schema_version') || 1; 102 if ($sv < SCHEMA_VERSION) { 103 require LATMOS::Accounts::Bases::Sql::upgrade; 104 if ($self->SchemaUpgrade()) { 105 $self->commit; 106 } else { 107 $self->rollback; 108 return; 109 } 110 } 111 } 100 112 101 113 foreach my $otype ($self->list_supported_objects) {
Note: See TracChangeset
for help on using the changeset viewer.