From a60a9d10ce94acc0c5bfed2a20c8bed4e91be725 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Fri, 16 Apr 2021 11:33:11 -0400 Subject: Fixed issue with connect calls that were manifested on macOS. --- player/player.F90 | 3 +++ 1 file changed, 3 insertions(+) (limited to 'player/player.F90') diff --git a/player/player.F90 b/player/player.F90 index dc05619..49803c5 100644 --- a/player/player.F90 +++ b/player/player.F90 @@ -58,6 +58,9 @@ implicit none checkin_json_available = request_json(url, j_checkin) if(checkin_json_available) then work_to_do = work_available(j_checkin) + else + Print *, "Checkin failed: "//trim(url) + work_to_do = .false. end if if(work_to_do) then -- cgit v1.2.3