View | Details | Raw Unified | Return to bug 25511
Collapse All | Expand All

(-)a/misc/devel/update_dbix_class_files.pl (-2 / +5 lines)
Lines 38-43 my $db_name; Link Here
38
my $db_user;
38
my $db_user;
39
my $db_passwd;
39
my $db_passwd;
40
my $koha_conf;
40
my $koha_conf;
41
my $force;
41
my $help;
42
my $help;
42
43
43
GetOptions(
44
GetOptions(
Lines 49-54 GetOptions( Link Here
49
    "db_user=s"   => \$db_user,
50
    "db_user=s"   => \$db_user,
50
    "db_passwd=s" => \$db_passwd,
51
    "db_passwd=s" => \$db_passwd,
51
    "koha-conf:s" => \$koha_conf,
52
    "koha-conf:s" => \$koha_conf,
53
    "force"       => \$force,
52
    "h|help"      => \$help
54
    "h|help"      => \$help
53
);
55
);
54
56
Lines 95-103 if (! defined $db_name ) { Link Here
95
    pod2usage(1);
97
    pod2usage(1);
96
} else {
98
} else {
97
99
100
    $force //= 0;
101
98
    make_schema_at(
102
    make_schema_at(
99
        "Koha::Schema",
103
        "Koha::Schema",
100
        { debug => 1, dump_directory => $path, preserve_case => 1 },
104
        { debug => 1, dump_directory => $path, preserve_case => 1, overwrite_modifications => $force },
101
        [
105
        [
102
            "DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",
106
            "DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port",
103
            $db_user,
107
            $db_user,
104
- 

Return to bug 25511