# - #4 : the developer version. The 4th number is the database subversion.
# used by developers when the database changes. updatedatabase take care of the changes itself
# and is automatically called by Auth.pm when needed.
-$VERSION = "18.06.00.023";
+$VERSION = "18.06.00.024";
sub version {
return $VERSION;
is_nullable: 1
size: 16
+=head2 pickup_location
+
+ data_type: 'tinyint'
+ default_value: 1
+ is_nullable: 0
+
=cut
__PACKAGE__->add_columns(
{ data_type => "varchar", is_nullable => 1, size => 255 },
"marcorgcode",
{ data_type => "varchar", is_nullable => 1, size => 16 },
+ "pickup_location",
+ { data_type => "tinyint", default_value => 1, is_nullable => 0 },
);
=head1 PRIMARY KEY
);
-# Created by DBIx::Class::Schema::Loader v0.07042 @ 2018-02-16 17:54:53
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:QOMUFz2EjvAVWCkIpNmvtg
+# Created by DBIx::Class::Schema::Loader v0.07042 @ 2018-09-06 16:28:49
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:N0tdcSAb4bMht/i0chipYQ
# You can replace this text with custom code or comments, and it will be preserved on regeneration
+++ /dev/null
-$DBversion = 'XXX'; # will be replaced by the RM
-if( CheckVersion( $DBversion ) ) {
- $dbh->do( "ALTER TABLE branches ADD COLUMN pickup_location TINYINT(1) not null default 1" );
-
- SetVersion( $DBversion );
- print "Upgrade to $DBversion done (Bug 7534 - Let libraries have configuration for pickup locations)\n";
-}
print "Upgrade to $DBversion done (Bug 18639 - Add replacementprice field to aqorders table)\n";
}
+$DBversion = '18.06.00.024';
+if( CheckVersion( $DBversion ) ) {
+ if( !column_exists( 'branches', 'pickup_location' ) ){
+ $dbh->do( "ALTER TABLE branches ADD COLUMN pickup_location TINYINT(1) not null default 1" );
+ }
+ SetVersion( $DBversion );
+ print "Upgrade to $DBversion done (Bug 7534 - Let libraries have configuration for pickup locations)\n";
+}
+
# SEE bug 13068
# if there is anything in the atomicupdate, read and execute it.