From f32d7d30c9cd38544349697e475355e8a2e2a478 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Thu, 21 May 2020 12:25:14 -0400
Subject: Binary files are now actually handled in the dumb terminal version.

---
 main.F90 | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'main.F90')

diff --git a/main.F90 b/main.F90
index 6d6b78d..af4a29d 100644
--- a/main.F90
+++ b/main.F90
@@ -27,6 +27,7 @@ use request
 use ag_render, only: appgraphics_renderer
 #else
 use dumb_render
+use dumb_binary
 #endif
 
 use render
@@ -50,6 +51,7 @@ implicit none
     type(appgraphics_renderer)::r
 #else
     type(dumb_renderer)::r
+    type(dumb_binary_handler)::bh
 #endif
 
     logical::running
@@ -103,7 +105,7 @@ implicit none
     do while(running)
         
         if(index(current_url, "gemini://") /= 1) then
-            call r%draw_error("Only gemini:// URLs supported ("//trim(current_url)//")")
+            call r%report_unsupported_protocol(trim(current_url))
             populated = .false. 
             loaded = .true.
             return_code = STATUS_LOCALFAIL
@@ -113,7 +115,7 @@ implicit none
             
             call r%report_status("Requesting "//trim(current_url))
             
-            return_code = request_url(current_url, io, return_type)
+            return_code = request_url(current_url, io, return_type, bh)
             populated = .true.
             
             call update_status(r, current_url, return_code)
-- 
cgit v1.2.3