From cd9283417a4b70335edf7ce0c5d15bfca111b807 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Mon, 7 Jun 2021 09:56:15 -0400 Subject: Git and shell tasks now default to the current directory if unspecified. --- player/instructions.f90 | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/player/instructions.f90 b/player/instructions.f90 index 3b2f0de..4669f18 100644 --- a/player/instructions.f90 +++ b/player/instructions.f90 @@ -331,6 +331,12 @@ contains end if found(3) = get_task_string(j, i, "directory", filename) + ! If no directory is specified, do it in the current directory + if(.not. found(3)) then + filename = '.' + found(3) = .true. + end if + found(4) = get_task_logical(j, i, "destructive", destructive) if(.not. found(4)) then @@ -351,6 +357,12 @@ contains found(1) = get_task_string(j, i, "command", cmd) found(2) = get_task_string(j, i, "directory", filename) + ! If no directory is specified, do it in the current directory + if(.not. found(2)) then + filename = '.' + found(2) = .true. + end if + if(.not. all(found,1)) then success = .false. else -- cgit v1.2.3