From 40c9cf38ca70f2d5b8418b5e2fdda78ab3707844 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Tue, 18 May 2021 08:56:54 -0400 Subject: Added time stamps to common player stdout messages. Fixed delete_tree task to blow away files by default. --- player/instructions.f90 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'player/instructions.f90') diff --git a/player/instructions.f90 b/player/instructions.f90 index 587b6c8..c0407c1 100644 --- a/player/instructions.f90 +++ b/player/instructions.f90 @@ -59,7 +59,8 @@ contains call j%get("status", json_string_value, found) if(found) then - Print *, "Checkin status: "//json_string_value + ! GNU Extension... :( + Print *, fdate()//" Checkin status: "//json_string_value work_available = (json_string_value /= "idle") else work_available = .false. -- cgit v1.2.3