From b16949ab56670ee59a868ac817aad102a20dd193 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com>
Date: Wed, 27 May 2020 17:02:26 -0400
Subject: Code cleanup and better error handling on the AppGraphics renderer.

---
 ag_render.f90 | 2 +-
 main.F90      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ag_render.f90 b/ag_render.f90
index 576d34d..3a91b92 100644
--- a/ag_render.f90
+++ b/ag_render.f90
@@ -835,7 +835,7 @@ contains
         
         end if
         
-        ag_report_unsupported_protocol = .true.
+        ag_report_unsupported_protocol = .false.
         
     end function ag_report_unsupported_protocol
     
diff --git a/main.F90 b/main.F90
index 9512f2c..b05c9c5 100644
--- a/main.F90
+++ b/main.F90
@@ -183,7 +183,7 @@ implicit none
         
         else if(.not. redo_layout .and. is_failure_code(return_code) .and. len_trim(current_url) == 0) then
             
-            call r%report_status("Exiting without initial site")
+            call r%draw_error("Exiting without initial site")
             running = .false.
         
         end if
-- 
cgit v1.2.3