Bug 25511: Add --force option to update_dbix_class_files.pl
This adds a --force option to the aforementioned script allowing those in the know to overwrite the schema when changes above the found are detected. Signed-off-by: Ere Maijala <ere.maijala@helsinki.fi> Signed-off-by: Julian Maurice <julian.maurice@biblibre.com> Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
parent
f1f3117583
commit
34666e2690
1 changed files with 5 additions and 1 deletions
|
@ -38,6 +38,7 @@ my $db_name;
|
||||||
my $db_user;
|
my $db_user;
|
||||||
my $db_passwd;
|
my $db_passwd;
|
||||||
my $koha_conf;
|
my $koha_conf;
|
||||||
|
my $force;
|
||||||
my $help;
|
my $help;
|
||||||
|
|
||||||
GetOptions(
|
GetOptions(
|
||||||
|
@ -49,6 +50,7 @@ GetOptions(
|
||||||
"db_user=s" => \$db_user,
|
"db_user=s" => \$db_user,
|
||||||
"db_passwd=s" => \$db_passwd,
|
"db_passwd=s" => \$db_passwd,
|
||||||
"koha-conf:s" => \$koha_conf,
|
"koha-conf:s" => \$koha_conf,
|
||||||
|
"force" => \$force,
|
||||||
"h|help" => \$help
|
"h|help" => \$help
|
||||||
);
|
);
|
||||||
|
|
||||||
|
@ -95,9 +97,11 @@ if (! defined $db_name ) {
|
||||||
pod2usage(1);
|
pod2usage(1);
|
||||||
} else {
|
} else {
|
||||||
|
|
||||||
|
$force //= 0;
|
||||||
|
|
||||||
make_schema_at(
|
make_schema_at(
|
||||||
"Koha::Schema",
|
"Koha::Schema",
|
||||||
{ debug => 1, dump_directory => $path, preserve_case => 1 },
|
{ debug => 1, dump_directory => $path, preserve_case => 1, overwrite_modifications => $force },
|
||||||
[
|
[
|
||||||
"DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",
|
"DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",
|
||||||
$db_user,
|
$db_user,
|
||||||
|
|
Loading…
Reference in a new issue