From b52aa3bf2b9cbb529b861566f6dbed24483c0b67 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Thu, 13 May 2021 08:58:10 -0400 Subject: Temporary directory is now configurable. --- captain/config.f90 | 7 +++++++ captain/example/levitating.conf | 2 ++ 2 files changed, 9 insertions(+) (limited to 'captain') 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 -- cgit v1.2.3