aboutsummaryrefslogtreecommitdiff
path: root/captain/config.f90
diff options
context:
space:
mode:
Diffstat (limited to 'captain/config.f90')
-rw-r--r--captain/config.f905
1 files changed, 5 insertions, 0 deletions
diff --git a/captain/config.f90 b/captain/config.f90
index 338dc4d..dc26ef4 100644
--- a/captain/config.f90
+++ b/captain/config.f90
@@ -36,6 +36,7 @@ contains
i = index(str, '=')
if(i > 0) then
+ i = i - 1 ! Remove the equal sign
v = adjustl(str(1:i))
end if
@@ -107,6 +108,10 @@ contains
call get_variable(line, cvariable)
call get_value(line, cvalue)
+
+ ! Debugging
+ ! Print *, trim(cvariable)//" => "//trim(cvalue)
+
call assign_config(trim(cvariable), trim(cvalue))
end if