aboutsummaryrefslogtreecommitdiff
path: root/captain
diff options
context:
space:
mode:
Diffstat (limited to 'captain')
-rw-r--r--captain/config.f907
-rw-r--r--captain/example/levitating.conf2
2 files changed, 9 insertions, 0 deletions
diff --git a/captain/config.f90 b/captain/config.f90
index 2e3ccaa..f3c9bd1 100644
--- a/captain/config.f90
+++ b/captain/config.f90
@@ -65,6 +65,9 @@ implicit none
character(*), parameter::SCRIPT_DIRECTORY_VARIABLE = "script-directory"
character(1024)::script_dir
+ character(*), parameter::TEMP_DIRECTORY_VARIABLE = "temp-directory"
+ character(1024)::temp_dir = "/tmp"
+
contains
subroutine get_variable(str, v)
@@ -104,6 +107,7 @@ contains
end subroutine get_value
subroutine assign_config(cvariable, cvalue)
+ use utilities, only: set_temporary_directory
implicit none
character(*), intent(in)::cvariable, cvalue
@@ -150,6 +154,9 @@ contains
else if(cvariable == LOGLEVEL_VARIABLE) then
read(cvalue, '(I3)') loglevel
+ else if(cvariable == TEMP_DIRECTORY_VARIABLE) then
+ call set_temporary_directory(cvalue)
+
end if
end subroutine assign_config
diff --git a/captain/example/levitating.conf b/captain/example/levitating.conf
index 127c6e6..34dc683 100644
--- a/captain/example/levitating.conf
+++ b/captain/example/levitating.conf
@@ -26,3 +26,5 @@ script-directory = /home/jeff/Workspace/levitating/captain/sql
instructions-directory = /home/jeff/Workspace/levitating/captain/example/instructions
release-directory = /home/jeff/Workspace/levitating/captain/example/releases
+
+temp-directory = /tmp/levitating