]>
Commit | Line | Data |
---|---|---|
1 | === modified file 'scripts/mysqlhotcopy.sh' | |
2 | --- scripts/mysqlhotcopy.sh 2008-03-07 20:45:40 +0000 | |
3 | +++ scripts/mysqlhotcopy.sh 2009-03-12 13:06:42 +0000 | |
4 | @@ -777,7 +777,24 @@ sub get_list_of_tables { | |
5 | } || []; | |
6 | warn "Unable to retrieve list of tables in $db: $@" if $@; | |
7 | ||
8 | - return (map { $_->[0] } @$tables); | |
9 | + my @ignore_tables = (); | |
10 | + | |
11 | + # Ignore tables for the mysql database | |
12 | + if ($db eq 'mysql') { | |
13 | + @ignore_tables = qw(general_log slow_log schema apply_status); | |
14 | + } | |
15 | + | |
16 | + my @res = (); | |
17 | + if ($#ignore_tables > 1) { | |
18 | + my @tmp = (map { $_->[0] } @$tables); | |
19 | + for my $t (@tmp) { | |
20 | + push(@res, $t) if not exists { map { $_=>1 } @ignore_tables }->{$t}; | |
21 | + } | |
22 | + } else { | |
23 | + @res = (map { $_->[0] } @$tables); | |
24 | + } | |
25 | + | |
26 | + return @res; | |
27 | } | |
28 | ||
29 | sub quote_names { | |
30 |