From 5ed7ea3172170fa05ac806250f695834d5d6ae58 Mon Sep 17 00:00:00 2001
From: Olav Frengstad <olav@fwt.no>
Date: Thu, 20 Jun 2013 09:53:23 +0200
Subject: Add support for {vm_args,_} argument in config

---
 src/rlx_state.erl | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'src/rlx_state.erl')

diff --git a/src/rlx_state.erl b/src/rlx_state.erl
index 9b0811f..f5f363e 100644
--- a/src/rlx_state.erl
+++ b/src/rlx_state.erl
@@ -37,6 +37,8 @@
          config_file/2,
          providers/1,
          providers/2,
+         vm_args/1,
+         vm_args/2,
          sys_config/1,
          sys_config/2,
          root_dir/1,
@@ -78,6 +80,7 @@
                   providers = [] :: [rlx_provider:t()],
                   available_apps = [] :: [rlx_app_info:t()],
                   default_configured_release :: {rlx_release:name(), rlx_release:vsn()},
+                  vm_args :: file:filename() | undefined,
                   sys_config :: file:filename() | undefined,
                   overrides :: [{AppName::atom(), Directory::file:filename()}],
                   skip_apps = [] :: [AppName::atom()],
@@ -183,6 +186,14 @@ config_file(State, ConfigFiles) ->
 providers(#state_t{providers=Providers}) ->
     Providers.
 
+-spec vm_args(t()) -> file:filename() | undefined.
+vm_args(#state_t{vm_args=VmArgs}) ->
+    VmArgs.
+
+-spec vm_args(t(), file:filename()) -> t().
+vm_args(State, VmArgs) ->
+	State#state_t{vm_args=VmArgs}.
+
 -spec sys_config(t()) -> file:filename() | undefined.
 sys_config(#state_t{sys_config=SysConfig}) ->
     SysConfig.
-- 
cgit v1.2.3