diff options
| author | Dan Gudmundsson <[email protected]> | 2011-05-12 18:24:39 +0200 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2011-11-28 15:04:38 +0100 |
| commit | 14335e788f03ffdbd0540c20623eed9f1fc58de5 (patch) | |
| tree | 3434ea9ea8f9e4097d5074592e3adb5b4599d1e2 /lib/mnesia/src/mnesia_monitor.erl | |
| parent | 2b36dd726551cf822041b065df5d753ed0dba8b1 (diff) | |
| download | otp-14335e788f03ffdbd0540c20623eed9f1fc58de5.tar.gz otp-14335e788f03ffdbd0540c20623eed9f1fc58de5.tar.bz2 otp-14335e788f03ffdbd0540c20623eed9f1fc58de5.zip | |
[mnesia] Add possibility for implementation dependent storage options to create_table
Diffstat (limited to 'lib/mnesia/src/mnesia_monitor.erl')
| -rw-r--r-- | lib/mnesia/src/mnesia_monitor.erl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/mnesia/src/mnesia_monitor.erl b/lib/mnesia/src/mnesia_monitor.erl index 8cb2e92c08..c08bbc879f 100644 --- a/lib/mnesia/src/mnesia_monitor.erl +++ b/lib/mnesia/src/mnesia_monitor.erl @@ -80,9 +80,9 @@ going_down = [], tm_started = false, early_connects = [], connecting, mq = []}). --define(current_protocol_version, {8,0}). +-define(current_protocol_version, {8,1}). --define(previous_protocol_version, {7,6}). +-define(previous_protocol_version, {8,0}). start() -> gen_server:start_link({local, ?MODULE}, ?MODULE, @@ -188,7 +188,7 @@ protocol_version() -> %% A sorted list of acceptable protocols the %% preferred protocols are first in the list acceptable_protocol_versions() -> - [protocol_version(), ?previous_protocol_version]. + [protocol_version(), ?previous_protocol_version, {7,6}]. needs_protocol_conversion(Node) -> case {?catch_val({protocol, Node}), protocol_version()} of @@ -417,6 +417,8 @@ handle_call({negotiate_protocol, Mon, Version, Protocols}, From, State) case hd(Protocols) of ?previous_protocol_version -> accept_protocol(Mon, MyVersion, ?previous_protocol_version, From, State); + {7,6} -> + accept_protocol(Mon, MyVersion, {7,6}, From, State); _ -> verbose("Connection with ~p rejected. " "version = ~p, protocols = ~p, " |