From 4e852bcd7f868c4637d886c71a25f5be1a6bbe9d Mon Sep 17 00:00:00 2001
From: Simon MacMullen <simon@rabbitmq.com>
Date: Thu, 9 May 2013 12:16:46 +0100
Subject: Validate on clear.

---
 src/rabbit_runtime_parameters.erl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/rabbit_runtime_parameters.erl b/src/rabbit_runtime_parameters.erl
index a9427ab4..d90b7c34 100644
--- a/src/rabbit_runtime_parameters.erl
+++ b/src/rabbit_runtime_parameters.erl
@@ -127,10 +127,10 @@ clear_any(VHost, Component, Name) ->
     end.
 
 mnesia_clear(VHost, Component, Name) ->
-    ok = rabbit_misc:execute_mnesia_transaction(
-           fun () ->
-                   ok = mnesia:delete(?TABLE, {VHost, Component, Name}, write)
-           end).
+    F = fun () ->
+                ok = mnesia:delete(?TABLE, {VHost, Component, Name}, write)
+        end,
+    ok = rabbit_misc:execute_mnesia_transaction(rabbit_vhost:with(VHost, F)).
 
 list() ->
     [p(P) || #runtime_parameters{ key = {_VHost, Comp, _Name}} = P <-
-- 
cgit v1.2.1